home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / maths / mathgraph < prev    next >
ArcFS Archive  |  1995-10-01  |  54.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: mathgraph

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 40 02 00 00 a0 02 00 00 |Archive.|@.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 4d 61 74 68 47 72 | 61 70 68 00 ff ff ff ff |.!MathGr|aph.....|
|00000070| 44 ff ff ff 13 c7 4d aa | 30 00 00 00 ff ff ff ff |D.....M.|0.......|
|00000080| 1c 02 00 80 82 21 42 6f | 6f 74 00 01 ff ff ff ff |.....!Bo|ot......|
|00000090| 8e 00 00 00 42 eb ff ff | 10 60 25 d7 03 00 a0 5e |....B...|.`%....^|
|000000a0| 8e 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 89 01 |....$...|.!Run...|
|000000b0| ff ff ff ff 61 00 00 00 | 42 eb ff ff ea 2d 0a 24 |....a...|B....-.$|
|000000c0| 03 00 f9 2c 61 00 00 00 | d6 00 00 00 82 21 52 75 |...,a...|.....!Ru|
|000000d0| 6e 69 6d 61 67 65 00 ff | d8 73 00 00 42 fb ff ff |nimage..|.s..B...|
|000000e0| 0e dc 87 24 03 00 6f 6a | d8 73 00 00 5b 01 00 00 |...$..oj|.s..[...|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 ff ff 20 09 00 00 |.!Sprite|s... ...|
|00000100| 42 f9 ff ff 79 87 08 24 | 03 00 03 66 20 09 00 00 |B...y..$|...f ...|
|00000110| 57 75 00 00 82 43 72 65 | 61 74 65 44 72 61 77 00 |Wu...Cre|ateDraw.|
|00000120| 3c 02 00 00 42 fb ff ff | b1 19 f4 23 03 00 b2 0c |<...B...|...#....|
|00000130| 3c 02 00 00 9b 7e 00 00 | 82 44 72 61 77 46 69 6c |<....~..|.DrawFil|
|00000140| 65 44 00 ff 74 1e 00 00 | 42 ff fa ff aa b6 85 24 |eD..t...|B......$|
|00000150| 03 00 bf f8 74 1e 00 00 | fb 80 00 00 82 44 72 61 |....t...|.....Dra|
|00000160| 77 46 69 6c 65 4d 00 ff | 74 1e 00 00 42 ff fa ff |wFileM..|t...B...|
|00000170| f6 ad 85 24 03 00 f7 20 | 74 1e 00 00 93 9f 00 00 |...$... |t.......|
|00000180| 82 44 72 61 77 52 65 61 | 64 00 ff ff 6d 02 00 00 |.DrawRea|d...m...|
|00000190| 42 fb ff ff 7f 3c 86 24 | 03 00 73 63 6d 02 00 00 |B....<.$|..scm...|
|000001a0| 2b be 00 00 82 6d 65 72 | 67 65 00 01 ff ff ff ff |+....mer|ge......|
|000001b0| e4 02 00 00 42 fb ff ff | ab e5 09 24 03 00 a2 e7 |....B...|...$....|
|000001c0| e4 02 00 00 bc c0 00 00 | 82 53 70 72 69 74 65 73 |........|.Sprites|
|000001d0| 00 ff ff ff 08 07 00 00 | 42 f9 ff ff 62 65 12 22 |........|B...be."|
|000001e0| 03 00 76 18 08 07 00 00 | c4 c3 00 00 82 54 65 6d |..v.....|.....Tem|
|000001f0| 70 6c 61 74 65 73 00 ff | b9 06 00 00 42 ec ff ff |plates..|....B...|
|00000200| 72 94 08 24 03 00 0e 85 | b9 06 00 00 f0 ca 00 00 |r..$....|........|
|00000210| 82 54 65 6d 70 6c 61 74 | 65 73 30 00 de 05 00 00 |.Templat|es0.....|
|00000220| 42 ec ff ff e6 c9 48 1a | 03 00 75 0f de 05 00 00 |B.....H.|..u.....|
|00000230| cd d1 00 00 82 54 65 6d | 70 6c 61 74 65 73 32 00 |.....Tem|plates2.|
|00000240| 84 00 00 00 42 ec ff ff | ec 9d 81 20 03 00 34 84 |....B...|... ..4.|
|00000250| 84 00 00 00 cf d7 00 00 | 00 68 00 00 95 e9 89 01 |........|.h......|
|00000260| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000270| ff ff ff ff ff ff ff ff | 6f 79 9a 00 00 00 00 00 |........|oy......|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 b4 00 00 00 |........|........|
|000002a0| 46 69 6c 65 44 61 74 61 | 82 21 42 6f 6f 74 00 01 |FileData|.!Boot..|
|000002b0| ff ff ff ff 8e 00 00 00 | 42 eb ff ff 10 60 25 d7 |........|B....`%.|
|000002c0| 03 00 a0 5e 7c 20 4d 61 | 74 68 67 72 61 70 68 0a |...^| Ma|thgraph.|
|000002d0| 7c 0a 73 65 74 20 4d 61 | 74 68 47 72 61 70 68 24 ||.set Ma|thGraph$|
|000002e0| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 49 |Dir <Obe|y$Dir>.I|
|000002f0| 63 6f 6e 73 70 72 69 74 | 65 73 20 3c 4d 61 74 68 |consprit|es <Math|
|00000300| 47 72 61 70 68 24 44 69 | 72 3e 2e 21 53 70 72 69 |Graph$Di|r>.!Spri|
|00000310| 74 65 73 0a 0a 7c 20 54 | 68 69 73 20 66 69 6c 65 |tes..| T|his file|
|00000320| 20 68 61 73 20 62 65 65 | 6e 20 69 6e 6e 6f 63 75 | has bee|n innocu|
|00000330| 6c 61 74 65 64 20 61 67 | 61 69 6e 73 74 20 74 68 |lated ag|ainst th|
|00000340| 65 20 45 78 74 65 6e 64 | 20 56 69 72 75 73 0a 7c |e Extend| Virus.||
|00000350| 7c ff 46 69 6c 65 44 61 | 74 61 82 21 52 75 6e 00 ||.FileDa|ta.!Run.|
|00000360| 89 01 ff ff ff ff 61 00 | 00 00 42 eb ff ff ea 2d |......a.|..B....-|
|00000370| 0a 24 03 00 f9 2c 7c 20 | 4d 61 74 68 67 72 61 70 |.$...,| |Mathgrap|
|00000380| 68 0a 7c 0a 57 49 4d 50 | 53 4c 4f 54 20 2d 6d 69 |h.|.WIMP|SLOT -mi|
|00000390| 6e 20 31 36 34 6b 20 2d | 6d 61 78 20 31 36 34 6b |n 164k -|max 164k|
|000003a0| 0a 73 65 74 20 4d 61 74 | 68 47 72 61 70 68 24 44 |.set Mat|hGraph$D|
|000003b0| 69 72 20 3c 4f 62 65 79 | 24 44 69 72 3e 0a 52 75 |ir <Obey|$Dir>.Ru|
|000003c0| 6e 20 3c 4f 62 65 79 24 | 44 69 72 3e 2e 21 52 75 |n <Obey$|Dir>.!Ru|
|000003d0| 6e 49 6d 61 67 65 0a 46 | 69 6c 65 44 61 74 61 82 |nImage.F|ileData.|
|000003e0| 21 52 75 6e 69 6d 61 67 | 65 00 ff d8 73 00 00 42 |!Runimag|e...s..B|
|000003f0| fb ff ff 0e dc 87 24 03 | 00 6f 6a 0d 00 0a 23 f4 |......$.|.oj...#.|
|00000400| 20 3e 20 20 20 3c 4d 61 | 74 68 47 72 61 70 68 24 | > <Ma|thGraph$|
|00000410| 44 69 72 3e 2e 21 52 75 | 6e 69 6d 61 67 65 0d 00 |Dir>.!Ru|nimage..|
|00000420| 14 04 0d 00 1e 04 0d 00 | 28 04 0d 00 32 04 0d 00 |........|(...2...|
|00000430| 3c 0e ee 20 85 20 f2 65 | 72 72 6f 72 0d 00 46 04 |<.. . .e|rror..F.|
|00000440| 0d 00 50 04 0d 00 5a 04 | 0d 00 64 09 f2 69 6e 69 |..P...Z.|..d..ini|
|00000450| 74 0d 00 6e 04 0d 00 78 | 0f f2 73 74 61 72 74 5f |t..n...x|..start_|
|00000460| 74 61 73 6b 0d 00 82 11 | f2 6f 75 72 5f 74 65 6d |task....|.our_tem|
|00000470| 70 6c 61 74 65 0d 00 8c | 11 f2 6c 6f 61 64 5f 73 |plate...|..load_s|
|00000480| 70 72 69 74 65 73 0d 00 | 96 14 f2 70 75 74 5f 69 |prites..|...put_i|
|00000490| 63 6f 6e 5f 6f 6e 5f 62 | 61 72 0d 00 a0 04 0d 00 |con_on_b|ar......|
|000004a0| aa 11 f2 63 72 65 61 74 | 65 5f 6d 65 6e 75 73 0d |...creat|e_menus.|
|000004b0| 00 b4 04 0d 00 be 1c f4 | 20 50 6f 6c 6c 69 6e 67 |........| Polling|
|000004c0| 20 4c 6f 6f 70 21 21 21 | 21 21 21 21 21 21 21 0d | Loop!!!|!!!!!!!.|
|000004d0| 00 c8 04 0d 00 d2 05 f5 | 0d 00 dc 04 0d 00 e6 3b |........|.......;|
|000004e0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 | .. "Wi|mp_Poll"|
|000004f0| 2c 28 31 2d 63 6f 6f 72 | 64 73 25 29 2c 70 6f 6c |,(1-coor|ds%),pol|
|00000500| 6c 5f 62 75 66 66 25 20 | b8 20 72 65 61 73 6f 6e |l_buff% |. reason|
|00000510| 25 2c 64 61 74 61 25 0d | 00 f0 12 20 20 c8 8e 20 |%,data%.|... .. |
|00000520| 72 65 61 73 6f 6e 25 20 | ca 0d 00 fa 35 20 20 20 |reason% |....5 |
|00000530| 20 c9 20 30 3a c8 99 20 | 22 57 69 6d 70 5f 47 65 | . 0:.. |"Wimp_Ge|
|00000540| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|00000550| 75 66 66 25 3a f2 63 6f | 6f 72 64 5f 6f 6e 0d 01 |uff%:.co|ord_on..|
|00000560| 04 1b 20 20 20 20 c9 20 | 31 3a f2 72 65 64 72 61 |.. . |1:.redra|
|00000570| 77 28 21 64 61 74 61 25 | 29 0d 01 0e 27 20 20 20 |w(!data%|)...' |
|00000580| 20 c9 20 32 3a c8 99 20 | 22 57 69 6d 70 5f 4f 70 | . 2:.. |"Wimp_Op|
|00000590| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 64 61 74 61 25 |enWindow|",,data%|
|000005a0| 0d 01 18 71 20 20 20 20 | c9 20 33 3a c8 99 20 22 |...q |. 3:.. "|
|000005b0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|000005c0| 22 2c 2c 64 61 74 61 25 | 3a e7 20 64 61 74 61 25 |",,data%|:. data%|
|000005d0| 21 30 3d 63 6f 6f 72 64 | 73 5f 68 61 6e 64 6c 65 |!0=coord|s_handle|
|000005e0| 25 20 8c 20 63 6f 6f 72 | 64 73 25 3d 30 3a 6d 61 |% . coor|ds%=0:ma|
|000005f0| 69 6e 5f 6d 65 6e 75 5f | 66 6c 61 67 73 25 28 63 |in_menu_|flags%(c|
|00000600| 6f 6f 72 64 73 5f 65 6e | 74 72 79 25 2b 31 29 3d |oords_en|try%+1)=|
|00000610| 30 0d 01 22 3f 20 20 20 | 20 c9 20 34 3a e7 20 70 |0.."? | . 4:. p|
|00000620| 6f 6c 6c 5f 62 75 66 66 | 25 21 30 3d 67 72 61 70 |oll_buff|%!0=grap|
|00000630| 68 5f 68 61 6e 64 6c 65 | 25 20 8c 20 63 6f 6f 72 |h_handle|% . coor|
|00000640| 64 73 25 3d a3 3a f2 63 | 6f 6f 72 64 5f 6f 66 66 |ds%=.:.c|oord_off|
|00000650| 0d 01 2c 54 20 20 20 20 | c9 20 35 3a e7 20 70 6f |..,T |. 5:. po|
|00000660| 6c 6c 5f 62 75 66 66 25 | 21 30 3d 67 72 61 70 68 |ll_buff%|!0=graph|
|00000670| 5f 68 61 6e 64 6c 65 25 | 20 8c 20 63 6f 6f 72 64 |_handle%| . coord|
|00000680| 73 25 3d 6d 61 69 6e 5f | 6d 65 6e 75 5f 66 6c 61 |s%=main_|menu_fla|
|00000690| 67 73 25 28 63 6f 6f 72 | 64 73 5f 65 6e 74 72 79 |gs%(coor|ds_entry|
|000006a0| 25 2b 31 29 0d 01 36 18 | 20 20 20 20 c9 20 36 3a |%+1)..6.| . 6:|
|000006b0| f2 63 68 65 63 6b 5f 6d | 6f 75 73 65 0d 01 40 17 |.check_m|ouse..@.|
|000006c0| 20 20 20 20 c9 20 37 3a | f2 63 68 65 63 6b 5f 64 | . 7:|.check_d|
|000006d0| 72 61 67 0d 01 4a 18 20 | 20 20 20 c9 20 38 3a f2 |rag..J. | . 8:.|
|000006e0| 6b 65 79 5f 70 72 65 73 | 73 65 64 0d 01 54 17 20 |key_pres|sed..T. |
|000006f0| 20 20 20 c9 20 39 3a f2 | 63 68 65 63 6b 5f 6d 65 | . 9:.|check_me|
|00000700| 6e 75 0d 01 5e 2d 20 20 | 20 20 c9 20 31 37 2c 31 |nu..^- | . 17,1|
|00000710| 38 2c 31 39 3a f2 72 65 | 63 65 69 76 65 5f 6d 65 |8,19:.re|ceive_me|
|00000720| 73 73 61 67 65 28 64 61 | 74 61 25 21 31 36 29 0d |ssage(da|ta%!16).|
|00000730| 01 68 07 20 20 cb 0d 01 | 72 04 0d 01 7c 07 fd 20 |.h. ...|r...|.. |
|00000740| a3 0d 01 86 08 4b 4a 48 | 4f 0d 01 90 04 0d 01 9a |.....KJH|O.......|
|00000750| 04 0d 01 a4 05 e0 0d 01 | ae 04 0d 01 b8 04 0d 01 |........|........|
|00000760| c2 11 dd 20 f2 73 74 61 | 72 74 5f 74 61 73 6b 0d |... .sta|rt_task.|
|00000770| 01 cc 0f de 20 74 61 73 | 6b 69 64 25 20 34 0d 01 |.... tas|kid% 4..|
|00000780| d6 13 24 74 61 73 6b 69 | 64 25 3d 22 54 41 53 4b |..$taski|d%="TASK|
|00000790| 22 0d 01 e0 39 c8 99 20 | 22 57 69 6d 70 5f 49 6e |"...9.. |"Wimp_In|
|000007a0| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 21 74 |itialise|",200,!t|
|000007b0| 61 73 6b 69 64 25 2c 41 | 70 70 4e 61 6d 65 24 20 |askid%,A|ppName$ |
|000007c0| b8 20 76 65 72 73 69 6f | 6e 25 0d 01 ea 04 0d 01 |. versio|n%......|
|000007d0| f4 05 e1 0d 01 fe 05 3a | 0d 02 08 0b dd 20 f2 69 |.......:|..... .i|
|000007e0| 6e 69 74 0d 02 12 18 41 | 70 70 4e 61 6d 65 24 3d |nit....A|ppName$=|
|000007f0| 22 4d 61 74 68 47 72 61 | 70 68 22 0d 02 1c 0f 45 |"MathGra|ph"....E|
|00000800| 24 3d 22 53 49 4e 28 58 | 29 22 0d 02 26 30 73 65 |$="SIN(X|)"..&0se|
|00000810| 6c 65 63 74 25 3d 2d 31 | 32 20 20 20 20 20 20 20 |lect%=-1|2 |
|00000820| 20 20 20 20 20 20 20 20 | 3a f4 20 64 75 6d 6d 79 | |:. dummy|
|00000830| 20 76 61 72 69 61 62 6c | 65 73 0d 02 30 26 61 64 | variabl|es..0&ad|
|00000840| 6a 75 73 74 25 3d 2d 31 | 33 20 20 20 20 20 20 20 |just%=-1|3 |
|00000850| 20 20 20 20 20 20 20 20 | 3a f4 20 64 69 74 74 6f | |:. ditto|
|00000860| 0d 02 3a 26 6d 65 6e 75 | 5f 62 75 74 74 6f 6e 25 |..:&menu|_button%|
|00000870| 3d 2d 31 34 20 20 20 20 | 20 20 20 20 20 20 3a f4 |=-14 | :.|
|00000880| 20 64 69 74 74 6f 0d 02 | 44 0f 6d 61 78 5f 6c 65 | ditto..|D.max_le|
|00000890| 6e 25 3d 32 30 0d 02 4e | 0d 63 6f 6f 72 64 73 25 |n%=20..N|.coords%|
|000008a0| 3d 30 0d 02 58 08 70 69 | 3d af 0d 02 62 0f 6c 78 |=0..X.pi|=...b.lx|
|000008b0| 24 3d 22 2d 32 2a 50 49 | 22 0d 02 6c 0e 68 78 24 |$="-2*PI|"..l.hx$|
|000008c0| 3d 22 32 2a 50 49 22 0d | 02 76 0e 6c 79 24 3d 22 |="2*PI".|.v.ly$="|
|000008d0| 2d 31 2e 35 22 0d 02 80 | 0d 68 79 24 3d 22 31 2e |-1.5"...|.hy$="1.|
|000008e0| 35 22 0d 02 8a 10 63 6f | 6f 72 64 24 3d 22 28 2c |5"....co|ord$="(,|
|000008f0| 29 22 0d 02 94 11 6d 61 | 78 5f 6c 69 6e 65 73 25 |)"....ma|x_lines%|
|00000900| 3d 35 30 0d 02 9e 14 de | 20 78 24 28 6d 61 78 5f |=50.....| x$(max_|
|00000910| 6c 69 6e 65 73 25 29 0d | 02 a8 14 de 20 79 24 28 |lines%).|.... y$(|
|00000920| 6d 61 78 5f 6c 69 6e 65 | 73 25 29 0d 02 b2 0d 78 |max_line|s%)....x|
|00000930| 6c 69 6e 65 73 25 3d 30 | 0d 02 bc 0d 79 6c 69 6e |lines%=0|....ylin|
|00000940| 65 73 25 3d 30 0d 02 c6 | 16 77 69 6e 64 6f 77 5f |es%=0...|.window_|
|00000950| 77 69 64 74 68 25 3d 31 | 32 33 36 0d 02 d0 16 77 |width%=1|236....w|
|00000960| 69 6e 64 6f 77 5f 68 65 | 69 67 68 74 25 3d 39 33 |indow_he|ight%=93|
|00000970| 36 0d 02 da 15 63 6f 6f | 72 64 73 5f 77 69 64 74 |6....coo|rds_widt|
|00000980| 68 25 3d 35 35 32 0d 02 | e4 16 63 6f 6f 72 64 73 |h%=552..|..coords|
|00000990| 5f 68 65 69 67 68 74 25 | 3d 31 32 38 0d 02 ee 10 |_height%|=128....|
|000009a0| 6c 61 73 74 74 65 78 74 | 24 3d 22 22 0d 02 f8 13 |lasttext|$=""....|
|000009b0| 6d 61 69 6e 5f 6d 65 6e | 75 25 3d 2d 31 32 33 0d |main_men|u%=-123.|
|000009c0| 03 02 12 62 61 72 5f 6d | 65 6e 75 25 3d 2d 32 33 |...bar_m|enu%=-23|
|000009d0| 34 0d 03 0c 0d 63 61 63 | 68 65 64 25 3d a3 0d 03 |4....cac|hed%=...|
|000009e0| 16 0e 6d 65 6e 75 5f 6f | 6e 25 3d 30 0d 03 20 13 |..menu_o|n%=0.. .|
|000009f0| 7a 6f 6f 6d 5f 63 6f 75 | 6e 74 65 72 25 3d 31 0d |zoom_cou|nter%=1.|
|00000a00| 03 2a 11 6d 61 78 5f 7a | 6f 6f 6d 25 3d 31 30 30 |.*.max_z|oom%=100|
|00000a10| 0d 03 34 10 6d 61 78 5f | 7a 6f 6f 6d 25 2b 3d 31 |..4.max_|zoom%+=1|
|00000a20| 0d 03 3e 15 de 20 7a 6c | 78 24 28 6d 61 78 5f 7a |..>.. zl|x$(max_z|
|00000a30| 6f 6f 6d 25 29 0d 03 48 | 15 de 20 7a 68 78 24 28 |oom%)..H|.. zhx$(|
|00000a40| 6d 61 78 5f 7a 6f 6f 6d | 25 29 0d 03 52 15 de 20 |max_zoom|%)..R.. |
|00000a50| 7a 6c 79 24 28 6d 61 78 | 5f 7a 6f 6f 6d 25 29 0d |zly$(max|_zoom%).|
|00000a60| 03 5c 15 de 20 7a 68 79 | 24 28 6d 61 78 5f 7a 6f |.\.. zhy|$(max_zo|
|00000a70| 6f 6d 25 29 0d 03 66 10 | de 20 62 75 66 66 25 20 |om%)..f.|. buff% |
|00000a80| 31 30 32 34 0d 03 70 16 | de 20 63 61 72 65 74 5f |1024..p.|. caret_|
|00000a90| 62 75 66 66 25 20 31 30 | 32 34 0d 03 7a 15 de 20 |buff% 10|24..z.. |
|00000aa0| 70 6f 6c 6c 5f 62 75 66 | 66 25 20 31 30 32 34 0d |poll_buf|f% 1024.|
|00000ab0| 03 84 14 de 20 65 72 72 | 5f 62 6c 6f 63 6b 25 20 |.... err|_block% |
|00000ac0| 32 30 30 0d 03 8e 13 de | 20 65 72 72 5f 6e 61 6d |200.....| err_nam|
|00000ad0| 65 25 20 32 30 30 0d 03 | 98 17 de 20 79 25 28 77 |e% 200..|... y%(w|
|00000ae0| 69 6e 64 6f 77 5f 77 69 | 64 74 68 25 29 0d 03 a2 |indow_wi|dth%)...|
|00000af0| 15 de 20 6d 65 6e 75 5f | 6c 69 73 74 25 20 31 30 |.. menu_|list% 10|
|00000b00| 32 34 0d 03 ac 1a de 20 | 73 61 76 65 5f 69 63 6f |24..... |save_ico|
|00000b10| 6e 5f 62 75 66 66 25 20 | 31 30 32 34 0d 03 b6 17 |n_buff% |1024....|
|00000b20| de 20 77 69 6e 64 6f 77 | 5f 62 75 66 66 25 20 31 |. window|_buff% 1|
|00000b30| 30 32 34 0d 03 c0 15 de | 20 73 61 76 65 5f 62 75 |024.....| save_bu|
|00000b40| 66 66 25 20 31 30 32 34 | 0d 03 ca 14 de 20 67 65 |ff% 1024|..... ge|
|00000b50| 74 5f 62 75 66 66 25 20 | 31 30 32 34 0d 03 d4 0c |t_buff% |1024....|
|00000b60| 70 69 78 65 6c 25 3d 32 | 0d 03 de 10 67 72 61 70 |pixel%=2|....grap|
|00000b70| 68 5f 63 6f 6c 25 3d 37 | 0d 03 e8 0f 61 78 65 73 |h_col%=7|....axes|
|00000b80| 5f 63 6f 6c 25 3d 33 0d | 03 f2 10 6c 69 6e 65 73 |_col%=3.|...lines|
|00000b90| 5f 63 6f 6c 25 3d 38 0d | 03 fc 0b 64 6f 74 73 25 |_col%=8.|...dots%|
|00000ba0| 3d a3 0d 04 06 1a 62 61 | 64 5f 76 61 6c 75 65 25 |=.....ba|d_value%|
|00000bb0| 3d 39 39 38 32 31 32 34 | 2e 32 33 34 0d 04 10 05 |=9982124|.234....|
|00000bc0| e1 0d 04 1a 05 3a 0d 04 | 24 13 dd 20 f2 63 72 65 |.....:..|$.. .cre|
|00000bd0| 61 74 65 5f 6d 65 6e 75 | 73 0d 04 2e 3d de 20 62 |ate_menu|s...=. b|
|00000be0| 61 72 5f 6d 65 6e 75 5f | 69 74 65 6d 73 24 28 32 |ar_menu_|items$(2|
|00000bf0| 29 2c 62 61 72 5f 6d 65 | 6e 75 5f 66 6c 61 67 73 |),bar_me|nu_flags|
|00000c00| 25 28 32 29 2c 62 61 72 | 5f 6d 65 6e 75 5f 73 75 |%(2),bar|_menu_su|
|00000c10| 62 73 25 28 32 29 0d 04 | 38 1a de 20 62 61 72 5f |bs%(2)..|8.. bar_|
|00000c20| 6d 65 6e 75 5f 62 6c 6f | 63 6b 25 20 31 30 32 34 |menu_blo|ck% 1024|
|00000c30| 0d 04 42 1d 62 61 72 5f | 6d 65 6e 75 5f 69 74 65 |..B.bar_|menu_ite|
|00000c40| 6d 73 24 28 31 29 3d 22 | 49 6e 66 6f 22 0d 04 4c |ms$(1)="|Info"..L|
|00000c50| 1d 62 61 72 5f 6d 65 6e | 75 5f 69 74 65 6d 73 24 |.bar_men|u_items$|
|00000c60| 28 32 29 3d 22 51 75 69 | 74 22 0d 04 56 18 62 61 |(2)="Qui|t"..V.ba|
|00000c70| 72 5f 6d 65 6e 75 5f 66 | 6c 61 67 73 25 28 31 29 |r_menu_f|lags%(1)|
|00000c80| 3d 30 0d 04 60 18 62 61 | 72 5f 6d 65 6e 75 5f 66 |=0..`.ba|r_menu_f|
|00000c90| 6c 61 67 73 25 28 32 29 | 3d 30 0d 04 6a 22 62 61 |lags%(2)|=0..j"ba|
|00000ca0| 72 5f 6d 65 6e 75 5f 73 | 75 62 73 25 28 31 29 3d |r_menu_s|ubs%(1)=|
|00000cb0| 69 6e 66 6f 5f 68 61 6e | 64 6c 65 25 0d 04 74 18 |info_han|dle%..t.|
|00000cc0| 62 61 72 5f 6d 65 6e 75 | 5f 73 75 62 73 25 28 32 |bar_menu|_subs%(2|
|00000cd0| 29 3d 2d 31 0d 04 7e 04 | 0d 04 88 37 de 20 78 5f |)=-1..~.|...7. x_|
|00000ce0| 6d 65 6e 75 5f 69 74 65 | 6d 73 24 28 31 29 2c 78 |menu_ite|ms$(1),x|
|00000cf0| 5f 6d 65 6e 75 5f 66 6c | 61 67 73 25 28 31 29 2c |_menu_fl|ags%(1),|
|00000d00| 78 5f 6d 65 6e 75 5f 73 | 75 62 73 25 28 31 29 0d |x_menu_s|ubs%(1).|
|00000d10| 04 92 18 de 20 78 5f 6d | 65 6e 75 5f 62 6c 6f 63 |.... x_m|enu_bloc|
|00000d20| 6b 25 20 31 30 32 34 0d | 04 9c 17 78 5f 6d 65 6e |k% 1024.|...x_men|
|00000d30| 75 5f 69 74 65 6d 73 24 | 28 31 29 3d 22 22 0d 04 |u_items$|(1)=""..|
|00000d40| a6 1d 78 5f 6d 65 6e 75 | 5f 66 6c 61 67 73 25 28 |..x_menu|_flags%(|
|00000d50| 31 29 3d 30 2b 28 31 3c | 3c 32 29 0d 04 b0 16 78 |1)=0+(1<|<2)....x|
|00000d60| 5f 6d 65 6e 75 5f 73 75 | 62 73 25 28 31 29 3d 2d |_menu_su|bs%(1)=-|
|00000d70| 31 0d 04 ba 15 74 65 78 | 74 5f 62 75 66 66 5f 6c |1....tex|t_buff_l|
|00000d80| 65 6e 25 3d 31 35 0d 04 | c4 1c de 20 78 5f 62 75 |en%=15..|... x_bu|
|00000d90| 66 66 25 20 74 65 78 74 | 5f 62 75 66 66 5f 6c 65 |ff% text|_buff_le|
|00000da0| 6e 25 0d 04 ce 1d de 20 | 78 5f 62 75 66 66 32 25 |n%..... |x_buff2%|
|00000db0| 20 74 65 78 74 5f 62 75 | 66 66 5f 6c 65 6e 25 0d | text_bu|ff_len%.|
|00000dc0| 04 d8 04 0d 04 e2 7e 78 | 5f 68 61 6e 64 6c 65 25 |......~x|_handle%|
|00000dd0| 3d a4 6d 65 6e 75 28 78 | 5f 6d 65 6e 75 5f 62 6c |=.menu(x|_menu_bl|
|00000de0| 6f 63 6b 25 2c 22 78 3d | 22 2c 78 5f 6d 65 6e 75 |ock%,"x=|",x_menu|
|00000df0| 5f 69 74 65 6d 73 24 28 | 29 2c 78 5f 6d 65 6e 75 |_items$(|),x_menu|
|00000e00| 5f 66 6c 61 67 73 25 28 | 29 2c 78 5f 6d 65 6e 75 |_flags%(|),x_menu|
|00000e10| 5f 73 75 62 73 25 28 29 | 2c 30 2c 30 2c b9 2c 78 |_subs%()|,0,0,.,x|
|00000e20| 5f 62 75 66 66 25 2c 78 | 5f 62 75 66 66 32 25 2c |_buff%,x|_buff2%,|
|00000e30| 74 65 78 74 5f 62 75 66 | 66 5f 6c 65 6e 25 2c a3 |text_buf|f_len%,.|
|00000e40| 29 0d 04 ec 04 0d 04 f6 | 37 de 20 79 5f 6d 65 6e |).......|7. y_men|
|00000e50| 75 5f 69 74 65 6d 73 24 | 28 31 29 2c 79 5f 6d 65 |u_items$|(1),y_me|
|00000e60| 6e 75 5f 66 6c 61 67 73 | 25 28 31 29 2c 79 5f 6d |nu_flags|%(1),y_m|
|00000e70| 65 6e 75 5f 73 75 62 73 | 25 28 31 29 0d 05 00 18 |enu_subs|%(1)....|
|00000e80| de 20 79 5f 6d 65 6e 75 | 5f 62 6c 6f 63 6b 25 20 |. y_menu|_block% |
|00000e90| 31 30 32 34 0d 05 0a 17 | 79 5f 6d 65 6e 75 5f 69 |1024....|y_menu_i|
|00000ea0| 74 65 6d 73 24 28 31 29 | 3d 22 22 0d 05 14 1d 79 |tems$(1)|=""....y|
|00000eb0| 5f 6d 65 6e 75 5f 66 6c | 61 67 73 25 28 31 29 3d |_menu_fl|ags%(1)=|
|00000ec0| 30 2b 28 31 3c 3c 32 29 | 0d 05 1e 16 79 5f 6d 65 |0+(1<<2)|....y_me|
|00000ed0| 6e 75 5f 73 75 62 73 25 | 28 31 29 3d 2d 31 0d 05 |nu_subs%|(1)=-1..|
|00000ee0| 28 1c de 20 79 5f 62 75 | 66 66 25 20 74 65 78 74 |(.. y_bu|ff% text|
|00000ef0| 5f 62 75 66 66 5f 6c 65 | 6e 25 0d 05 32 1d de 20 |_buff_le|n%..2.. |
|00000f00| 79 5f 62 75 66 66 32 25 | 20 74 65 78 74 5f 62 75 |y_buff2%| text_bu|
|00000f10| 66 66 5f 6c 65 6e 25 0d | 05 3c 04 0d 05 46 7e 79 |ff_len%.|.<...F~y|
|00000f20| 5f 68 61 6e 64 6c 65 25 | 3d a4 6d 65 6e 75 28 79 |_handle%|=.menu(y|
|00000f30| 5f 6d 65 6e 75 5f 62 6c | 6f 63 6b 25 2c 22 79 3d |_menu_bl|ock%,"y=|
|00000f40| 22 2c 79 5f 6d 65 6e 75 | 5f 69 74 65 6d 73 24 28 |",y_menu|_items$(|
|00000f50| 29 2c 79 5f 6d 65 6e 75 | 5f 66 6c 61 67 73 25 28 |),y_menu|_flags%(|
|00000f60| 29 2c 79 5f 6d 65 6e 75 | 5f 73 75 62 73 25 28 29 |),y_menu|_subs%()|
|00000f70| 2c 30 2c 30 2c b9 2c 79 | 5f 62 75 66 66 25 2c 79 |,0,0,.,y|_buff%,y|
|00000f80| 5f 62 75 66 66 32 25 2c | 74 65 78 74 5f 62 75 66 |_buff2%,|text_buf|
|00000f90| 66 5f 6c 65 6e 25 2c a3 | 29 0d 05 50 04 0d 05 5a |f_len%,.|)..P...Z|
|00000fa0| 18 6d 61 69 6e 5f 6d 65 | 6e 75 5f 65 6e 74 72 69 |.main_me|nu_entri|
|00000fb0| 65 73 25 3d 38 0d 05 64 | 73 de 20 6d 61 69 6e 5f |es%=8..d|s. main_|
|00000fc0| 6d 65 6e 75 5f 69 74 65 | 6d 73 24 28 6d 61 69 6e |menu_ite|ms$(main|
|00000fd0| 5f 6d 65 6e 75 5f 65 6e | 74 72 69 65 73 25 29 2c |_menu_en|tries%),|
|00000fe0| 6d 61 69 6e 5f 6d 65 6e | 75 5f 66 6c 61 67 73 25 |main_men|u_flags%|
|00000ff0| 28 6d 61 69 6e 5f 6d 65 | 6e 75 5f 65 6e 74 72 69 |(main_me|nu_entri|
|00001000| 65 73 25 29 2c 6d 61 69 | 6e 5f 6d 65 6e 75 5f 73 |es%),mai|n_menu_s|
|00001010| 75 62 73 25 28 6d 61 69 | 6e 5f 6d 65 6e 75 5f 65 |ubs%(mai|n_menu_e|
|00001020| 6e 74 72 69 65 73 25 29 | 0d 05 6e 1b de 20 6d 61 |ntries%)|..n.. ma|
|00001030| 69 6e 5f 6d 65 6e 75 5f | 62 6c 6f 63 6b 25 20 31 |in_menu_|block% 1|
|00001040| 30 32 34 0d 05 78 11 65 | 64 69 74 5f 65 6e 74 72 |024..x.e|dit_entr|
|00001050| 79 25 3d 31 0d 05 82 12 | 78 6c 69 6e 65 5f 65 6e |y%=1....|xline_en|
|00001060| 74 72 79 25 3d 32 0d 05 | 8c 12 79 6c 69 6e 65 5f |try%=2..|..yline_|
|00001070| 65 6e 74 72 79 25 3d 33 | 0d 05 96 13 63 6f 6f 72 |entry%=3|....coor|
|00001080| 64 73 5f 65 6e 74 72 79 | 25 3d 34 0d 05 a0 11 64 |ds_entry|%=4....d|
|00001090| 6f 74 73 5f 65 6e 74 72 | 79 25 3d 35 0d 05 aa 12 |ots_entr|y%=5....|
|000010a0| 63 6c 65 61 72 5f 65 6e | 74 72 79 25 3d 36 0d 05 |clear_en|try%=6..|
|000010b0| b4 11 75 6e 64 6f 5f 65 | 6e 74 72 79 25 3d 37 0d |..undo_e|ntry%=7.|
|000010c0| 05 be 11 73 61 76 65 5f | 65 6e 74 72 79 25 3d 30 |...save_|entry%=0|
|000010d0| 0d 05 c8 30 6d 61 69 6e | 5f 6d 65 6e 75 5f 69 74 |...0main|_menu_it|
|000010e0| 65 6d 73 24 28 65 64 69 | 74 5f 65 6e 74 72 79 25 |ems$(edi|t_entry%|
|000010f0| 2b 31 29 3d 22 45 64 69 | 74 20 67 72 61 70 68 22 |+1)="Edi|t graph"|
|00001100| 0d 05 d2 2e 6d 61 69 6e | 5f 6d 65 6e 75 5f 69 74 |....main|_menu_it|
|00001110| 65 6d 73 24 28 63 6f 6f | 72 64 73 5f 65 6e 74 72 |ems$(coo|rds_entr|
|00001120| 79 25 2b 31 29 3d 22 43 | 6f 6f 72 64 73 22 0d 05 |y%+1)="C|oords"..|
|00001130| dc 2f 6d 61 69 6e 5f 6d | 65 6e 75 5f 69 74 65 6d |./main_m|enu_item|
|00001140| 73 24 28 78 6c 69 6e 65 | 5f 65 6e 74 72 79 25 2b |s$(xline|_entry%+|
|00001150| 31 29 3d 22 53 68 6f 77 | 20 78 3d 6b 22 0d 05 e6 |1)="Show| x=k"...|
|00001160| 2f 6d 61 69 6e 5f 6d 65 | 6e 75 5f 69 74 65 6d 73 |/main_me|nu_items|
|00001170| 24 28 79 6c 69 6e 65 5f | 65 6e 74 72 79 25 2b 31 |$(yline_|entry%+1|
|00001180| 29 3d 22 53 68 6f 77 20 | 79 3d 6b 22 0d 05 f0 2e |)="Show |y=k"....|
|00001190| 6d 61 69 6e 5f 6d 65 6e | 75 5f 69 74 65 6d 73 24 |main_men|u_items$|
|000011a0| 28 64 6f 74 73 5f 65 6e | 74 72 79 25 2b 31 29 3d |(dots_en|try%+1)=|
|000011b0| 22 55 73 65 20 64 6f 74 | 73 22 0d 05 fa 33 6d 61 |"Use dot|s"...3ma|
|000011c0| 69 6e 5f 6d 65 6e 75 5f | 69 74 65 6d 73 24 28 63 |in_menu_|items$(c|
|000011d0| 6c 65 61 72 5f 65 6e 74 | 72 79 25 2b 31 29 3d 22 |lear_ent|ry%+1)="|
|000011e0| 7e 43 6c 65 61 72 20 6c | 69 6e 65 73 22 0d 06 04 |~Clear l|ines"...|
|000011f0| 30 6d 61 69 6e 5f 6d 65 | 6e 75 5f 69 74 65 6d 73 |0main_me|nu_items|
|00001200| 24 28 75 6e 64 6f 5f 65 | 6e 74 72 79 25 2b 31 29 |$(undo_e|ntry%+1)|
|00001210| 3d 22 7e 55 6e 64 6f 20 | 7a 6f 6f 6d 22 0d 06 0e |="~Undo |zoom"...|
|00001220| 2a 6d 61 69 6e 5f 6d 65 | 6e 75 5f 69 74 65 6d 73 |*main_me|nu_items|
|00001230| 24 28 73 61 76 65 5f 65 | 6e 74 72 79 25 2b 31 29 |$(save_e|ntry%+1)|
|00001240| 3d 22 53 61 76 65 22 0d | 06 18 25 6d 61 69 6e 5f |="Save".|..%main_|
|00001250| 6d 65 6e 75 5f 66 6c 61 | 67 73 25 28 65 64 69 74 |menu_fla|gs%(edit|
|00001260| 5f 65 6e 74 72 79 25 2b | 31 29 3d 30 0d 06 22 2d |_entry%+|1)=0.."-|
|00001270| 6d 61 69 6e 5f 6d 65 6e | 75 5f 66 6c 61 67 73 25 |main_men|u_flags%|
|00001280| 28 63 6f 6f 72 64 73 5f | 65 6e 74 72 79 25 2b 31 |(coords_|entry%+1|
|00001290| 29 3d 63 6f 6f 72 64 73 | 25 0d 06 2c 26 6d 61 69 |)=coords|%..,&mai|
|000012a0| 6e 5f 6d 65 6e 75 5f 66 | 6c 61 67 73 25 28 78 6c |n_menu_f|lags%(xl|
|000012b0| 69 6e 65 5f 65 6e 74 72 | 79 25 2b 31 29 3d 30 0d |ine_entr|y%+1)=0.|
|000012c0| 06 36 26 6d 61 69 6e 5f | 6d 65 6e 75 5f 66 6c 61 |.6&main_|menu_fla|
|000012d0| 67 73 25 28 79 6c 69 6e | 65 5f 65 6e 74 72 79 25 |gs%(ylin|e_entry%|
|000012e0| 2b 31 29 3d 30 0d 06 40 | 2a 6d 61 69 6e 5f 6d 65 |+1)=0..@|*main_me|
|000012f0| 6e 75 5f 66 6c 61 67 73 | 25 28 64 6f 74 73 5f 65 |nu_flags|%(dots_e|
|00001300| 6e 74 72 79 25 2b 31 29 | 3d 2d 64 6f 74 73 25 0d |ntry%+1)|=-dots%.|
|00001310| 06 4a 26 6d 61 69 6e 5f | 6d 65 6e 75 5f 66 6c 61 |.J&main_|menu_fla|
|00001320| 67 73 25 28 63 6c 65 61 | 72 5f 65 6e 74 72 79 25 |gs%(clea|r_entry%|
|00001330| 2b 31 29 3d 30 0d 06 54 | 25 6d 61 69 6e 5f 6d 65 |+1)=0..T|%main_me|
|00001340| 6e 75 5f 66 6c 61 67 73 | 25 28 75 6e 64 6f 5f 65 |nu_flags|%(undo_e|
|00001350| 6e 74 72 79 25 2b 31 29 | 3d 30 0d 06 5e 25 6d 61 |ntry%+1)|=0..^%ma|
|00001360| 69 6e 5f 6d 65 6e 75 5f | 66 6c 61 67 73 25 28 73 |in_menu_|flags%(s|
|00001370| 61 76 65 5f 65 6e 74 72 | 79 25 2b 31 29 3d 30 0d |ave_entr|y%+1)=0.|
|00001380| 06 68 33 6d 61 69 6e 5f | 6d 65 6e 75 5f 73 75 62 |.h3main_|menu_sub|
|00001390| 73 25 28 65 64 69 74 5f | 65 6e 74 72 79 25 2b 31 |s%(edit_|entry%+1|
|000013a0| 29 3d 64 69 61 6c 6f 67 | 75 65 5f 68 61 6e 64 6c |)=dialog|ue_handl|
|000013b0| 65 25 0d 06 72 27 6d 61 | 69 6e 5f 6d 65 6e 75 5f |e%..r'ma|in_menu_|
|000013c0| 73 75 62 73 25 28 63 6f | 6f 72 64 73 5f 65 6e 74 |subs%(co|ords_ent|
|000013d0| 72 79 25 2b 31 29 3d 2d | 31 0d 06 7c 31 6d 61 69 |ry%+1)=-|1..|1mai|
|000013e0| 6e 5f 6d 65 6e 75 5f 73 | 75 62 73 25 28 78 6c 69 |n_menu_s|ubs%(xli|
|000013f0| 6e 65 5f 65 6e 74 72 79 | 25 2b 31 29 3d 78 5f 6d |ne_entry|%+1)=x_m|
|00001400| 65 6e 75 5f 62 6c 6f 63 | 6b 25 0d 06 86 31 6d 61 |enu_bloc|k%...1ma|
|00001410| 69 6e 5f 6d 65 6e 75 5f | 73 75 62 73 25 28 79 6c |in_menu_|subs%(yl|
|00001420| 69 6e 65 5f 65 6e 74 72 | 79 25 2b 31 29 3d 79 5f |ine_entr|y%+1)=y_|
|00001430| 6d 65 6e 75 5f 62 6c 6f | 63 6b 25 0d 06 90 25 6d |menu_blo|ck%...%m|
|00001440| 61 69 6e 5f 6d 65 6e 75 | 5f 73 75 62 73 25 28 64 |ain_menu|_subs%(d|
|00001450| 6f 74 73 5f 65 6e 74 72 | 79 25 2b 31 29 3d 2d 31 |ots_entr|y%+1)=-1|
|00001460| 0d 06 9a 26 6d 61 69 6e | 5f 6d 65 6e 75 5f 73 75 |...&main|_menu_su|
|00001470| 62 73 25 28 63 6c 65 61 | 72 5f 65 6e 74 72 79 25 |bs%(clea|r_entry%|
|00001480| 2b 31 29 3d 2d 31 0d 06 | a4 25 6d 61 69 6e 5f 6d |+1)=-1..|.%main_m|
|00001490| 65 6e 75 5f 73 75 62 73 | 25 28 75 6e 64 6f 5f 65 |enu_subs|%(undo_e|
|000014a0| 6e 74 72 79 25 2b 31 29 | 3d 2d 31 0d 06 ae 2f 6d |ntry%+1)|=-1.../m|
|000014b0| 61 69 6e 5f 6d 65 6e 75 | 5f 73 75 62 73 25 28 73 |ain_menu|_subs%(s|
|000014c0| 61 76 65 5f 65 6e 74 72 | 79 25 2b 31 29 3d 73 61 |ave_entr|y%+1)=sa|
|000014d0| 76 65 5f 68 61 6e 64 6c | 65 25 0d 06 b8 04 0d 06 |ve_handl|e%......|
|000014e0| c2 05 e1 0d 06 cc 05 3a | 0d 06 d6 0c dd 20 f2 65 |.......:|..... .e|
|000014f0| 72 72 6f 72 0d 06 e0 08 | ea 20 72 25 0d 06 ea 43 |rror....|. r%...C|
|00001500| 45 72 72 6f 72 24 3d f6 | 24 2b 22 20 61 74 20 6c |Error$=.|$+" at l|
|00001510| 69 6e 65 20 6e 75 6d 62 | 65 72 20 22 2b c3 28 9e |ine numb|er "+.(.|
|00001520| 29 2b 22 20 27 22 2b c3 | 28 79 6c 69 6e 65 73 25 |)+" '"+.|(ylines%|
|00001530| 29 2b 22 20 22 2b 79 24 | 28 31 29 2b 22 27 22 0d |)+" "+y$|(1)+"'".|
|00001540| 06 f4 13 de 20 65 72 72 | 62 6c 6f 63 6b 25 20 31 |.... err|block% 1|
|00001550| 30 30 0d 06 fe 10 21 65 | 72 72 62 6c 6f 63 6b 25 |00....!e|rrblock%|
|00001560| 3d 9f 0d 07 08 1c 24 28 | 65 72 72 62 6c 6f 63 6b |=.....$(|errblock|
|00001570| 25 2b 34 29 3d 45 72 72 | 6f 72 24 2b bd 30 0d 07 |%+4)=Err|or$+.0..|
|00001580| 12 34 c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 |.4.. "Wi|mp_Repor|
|00001590| 74 45 72 72 6f 72 22 2c | 65 72 72 62 6c 6f 63 6b |tError",|errblock|
|000015a0| 25 2c 37 2c 41 70 70 4e | 61 6d 65 24 20 b8 20 2c |%,7,AppN|ame$ . ,|
|000015b0| 72 25 0d 07 1c 22 e7 20 | 72 25 3d 32 20 8c 20 c8 |r%...". |r%=2 . .|
|000015c0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |. "Wimp_|CloseDow|
|000015d0| 6e 22 3a e0 0d 07 26 05 | e1 0d 07 30 05 3a 0d 07 |n":...&.|...0.:..|
|000015e0| 3a 13 dd 20 f2 6f 75 72 | 5f 74 65 6d 70 6c 61 74 |:.. .our|_templat|
|000015f0| 65 0d 07 44 29 ea 20 69 | 63 6f 6e 5f 62 75 66 66 |e..D). i|con_buff|
|00001600| 5f 6c 65 6e 25 2c 6e 65 | 77 73 70 61 63 65 25 2c |_len%,ne|wspace%,|
|00001610| 6e 65 77 5f 65 6e 74 72 | 79 25 0d 07 4e 19 69 63 |new_entr|y%..N.ic|
|00001620| 6f 6e 5f 62 75 66 66 5f | 6c 65 6e 25 3d 35 2a 31 |on_buff_|len%=5*1|
|00001630| 30 32 34 0d 07 58 1b de | 20 74 65 6d 70 6c 61 74 |024..X..| templat|
|00001640| 65 5f 62 75 66 66 25 20 | 31 30 32 34 2a 32 0d 07 |e_buff% |1024*2..|
|00001650| 62 1f de 20 69 63 6f 6e | 5f 62 75 66 66 25 20 69 |b.. icon|_buff% i|
|00001660| 63 6f 6e 5f 62 75 66 66 | 5f 6c 65 6e 25 0d 07 6c |con_buff|_len%..l|
|00001670| 05 3a 0d 07 76 05 3a 0d | 07 80 37 c8 99 20 22 57 |.:..v.:.|..7.. "W|
|00001680| 69 6d 70 5f 4f 70 65 6e | 54 65 6d 70 6c 61 74 65 |imp_Open|Template|
|00001690| 22 2c 2c 22 3c 4d 61 74 | 68 47 72 61 70 68 24 44 |",,"<Mat|hGraph$D|
|000016a0| 69 72 3e 2e 54 65 6d 70 | 6c 61 74 65 73 22 0d 07 |ir>.Temp|lates"..|
|000016b0| 8a 04 0d 07 94 7b c8 99 | 20 22 57 69 6d 70 5f 4c |.....{..| "Wimp_L|
|000016c0| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 74 65 |oadTempl|ate",,te|
|000016d0| 6d 70 6c 61 74 65 5f 62 | 75 66 66 25 2c 69 63 6f |mplate_b|uff%,ico|
|000016e0| 6e 5f 62 75 66 66 25 2c | 69 63 6f 6e 5f 62 75 66 |n_buff%,|icon_buf|
|000016f0| 66 25 2b 69 63 6f 6e 5f | 62 75 66 66 5f 6c 65 6e |f%+icon_|buff_len|
|00001700| 25 2d 31 2c 2d 31 2c 22 | 47 72 61 70 68 22 2c 30 |%-1,-1,"|Graph",0|
|00001710| 20 b8 20 2c 2c 6e 65 77 | 5f 73 70 61 63 65 25 2c | . ,,new|_space%,|
|00001720| 2c 2c 2c 6e 65 77 5f 65 | 6e 74 72 79 25 0d 07 9e |,,,new_e|ntry%...|
|00001730| 3a c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |:.. "Wim|p_Create|
|00001740| 57 69 6e 64 6f 77 22 2c | 2c 74 65 6d 70 6c 61 74 |Window",|,templat|
|00001750| 65 5f 62 75 66 66 25 20 | b8 20 67 72 61 70 68 5f |e_buff% |. graph_|
|00001760| 68 61 6e 64 6c 65 25 0d | 07 a8 04 0d 07 b2 7a c8 |handle%.|......z.|
|00001770| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00001780| 6c 61 74 65 22 2c 2c 74 | 65 6d 70 6c 61 74 65 5f |late",,t|emplate_|
|00001790| 62 75 66 66 25 2c 6e 65 | 77 5f 73 70 61 63 65 25 |buff%,ne|w_space%|
|000017a0| 2c 69 63 6f 6e 5f 62 75 | 66 66 25 2b 69 63 6f 6e |,icon_bu|ff%+icon|
|000017b0| 5f 62 75 66 66 5f 6c 65 | 6e 25 2d 31 2c 2d 31 2c |_buff_le|n%-1,-1,|
|000017c0| 22 49 6e 66 6f 22 2c 30 | 20 b8 20 2c 2c 6e 65 77 |"Info",0| . ,,new|
|000017d0| 5f 73 70 61 63 65 25 2c | 2c 2c 2c 6e 65 77 5f 65 |_space%,|,,,new_e|
|000017e0| 6e 74 72 79 25 0d 07 bc | 39 c8 99 20 22 57 69 6d |ntry%...|9.. "Wim|
|000017f0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00001800| 2c 74 65 6d 70 6c 61 74 | 65 5f 62 75 66 66 25 20 |,templat|e_buff% |
|00001810| b8 20 69 6e 66 6f 5f 68 | 61 6e 64 6c 65 25 0d 07 |. info_h|andle%..|
|00001820| c6 04 0d 07 d0 7e c8 99 | 20 22 57 69 6d 70 5f 4c |.....~..| "Wimp_L|
|00001830| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 74 65 |oadTempl|ate",,te|
|00001840| 6d 70 6c 61 74 65 5f 62 | 75 66 66 25 2c 6e 65 77 |mplate_b|uff%,new|
|00001850| 5f 73 70 61 63 65 25 2c | 69 63 6f 6e 5f 62 75 66 |_space%,|icon_buf|
|00001860| 66 25 2b 69 63 6f 6e 5f | 62 75 66 66 5f 6c 65 6e |f%+icon_|buff_len|
|00001870| 25 2d 31 2c 2d 31 2c 22 | 44 69 61 6c 6f 67 75 65 |%-1,-1,"|Dialogue|
|00001880| 22 2c 30 20 b8 20 2c 2c | 6e 65 77 5f 73 70 61 63 |",0 . ,,|new_spac|
|00001890| 65 25 2c 2c 2c 2c 6e 65 | 77 5f 65 6e 74 72 79 25 |e%,,,,ne|w_entry%|
|000018a0| 0d 07 da 3d c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...=.. "|Wimp_Cre|
|000018b0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 74 65 6d 70 |ateWindo|w",,temp|
|000018c0| 6c 61 74 65 5f 62 75 66 | 66 25 20 b8 20 64 69 61 |late_buf|f% . dia|
|000018d0| 6c 6f 67 75 65 5f 68 61 | 6e 64 6c 65 25 0d 07 e4 |logue_ha|ndle%...|
|000018e0| 04 0d 07 ee 7c c8 99 20 | 22 57 69 6d 70 5f 4c 6f |....|.. |"Wimp_Lo|
|000018f0| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 74 65 6d |adTempla|te",,tem|
|00001900| 70 6c 61 74 65 5f 62 75 | 66 66 25 2c 6e 65 77 5f |plate_bu|ff%,new_|
|00001910| 73 70 61 63 65 25 2c 69 | 63 6f 6e 5f 62 75 66 66 |space%,i|con_buff|
|00001920| 25 2b 69 63 6f 6e 5f 62 | 75 66 66 5f 6c 65 6e 25 |%+icon_b|uff_len%|
|00001930| 2d 31 2c 2d 31 2c 22 53 | 61 76 65 61 73 22 2c 30 |-1,-1,"S|aveas",0|
|00001940| 20 b8 20 2c 2c 6e 65 77 | 5f 73 70 61 63 65 25 2c | . ,,new|_space%,|
|00001950| 2c 2c 2c 6e 65 77 5f 65 | 6e 74 72 79 25 0d 07 f8 |,,,new_e|ntry%...|
|00001960| 39 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |9.. "Wim|p_Create|
|00001970| 57 69 6e 64 6f 77 22 2c | 2c 74 65 6d 70 6c 61 74 |Window",|,templat|
|00001980| 65 5f 62 75 66 66 25 20 | b8 20 73 61 76 65 5f 68 |e_buff% |. save_h|
|00001990| 61 6e 64 6c 65 25 0d 08 | 02 04 0d 08 0c 5f c8 99 |andle%..|....._..|
|000019a0| 20 22 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c | "Wimp_L|oadTempl|
|000019b0| 61 74 65 22 2c 2c 74 65 | 6d 70 6c 61 74 65 5f 62 |ate",,te|mplate_b|
|000019c0| 75 66 66 25 2c 6e 65 77 | 5f 73 70 61 63 65 25 2c |uff%,new|_space%,|
|000019d0| 69 63 6f 6e 5f 62 75 66 | 66 25 2b 69 63 6f 6e 5f |icon_buf|f%+icon_|
|000019e0| 62 75 66 66 5f 6c 65 6e | 25 2d 31 2c 2d 31 2c 22 |buff_len|%-1,-1,"|
|000019f0| 63 6f 6f 72 64 73 22 2c | 30 0d 08 16 3b c8 99 20 |coords",|0...;.. |
|00001a00| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00001a10| 6f 77 22 2c 2c 74 65 6d | 70 6c 61 74 65 5f 62 75 |ow",,tem|plate_bu|
|00001a20| 66 66 25 20 b8 20 63 6f | 6f 72 64 73 5f 68 61 6e |ff% . co|ords_han|
|00001a30| 64 6c 65 25 0d 08 20 04 | 0d 08 2a 1b c8 99 20 22 |dle%.. .|..*... "|
|00001a40| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|00001a50| 74 65 22 0d 08 34 05 e1 | 0d 08 3e 05 3a 0d 08 48 |te"..4..|..>.:..H|
|00001a60| 29 dd 20 f2 6f 70 65 6e | 5f 77 69 6e 64 6f 77 5f |). .open|_window_|
|00001a70| 61 73 5f 69 73 28 68 61 | 6e 64 6c 65 25 2c 62 65 |as_is(ha|ndle%,be|
|00001a80| 68 69 6e 64 25 29 0d 08 | 52 12 21 62 75 66 66 25 |hind%)..|R.!buff%|
|00001a90| 3d 68 61 6e 64 6c 65 25 | 0d 08 5c 22 c8 99 20 22 |=handle%|..\".. "|
|00001aa0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00001ab0| 66 6f 22 2c 2c 62 75 66 | 66 25 0d 08 66 14 62 75 |fo",,buf|f%..f.bu|
|00001ac0| 66 66 25 21 32 38 3d 62 | 65 68 69 6e 64 25 0d 08 |ff%!28=b|ehind%..|
|00001ad0| 70 1f c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |p... "Wi|mp_OpenW|
|00001ae0| 69 6e 64 6f 77 22 2c 2c | 62 75 66 66 25 0d 08 7a |indow",,|buff%..z|
|00001af0| 05 e1 0d 08 84 05 3a 0d | 08 8e 0b dd 20 f2 71 75 |......:.|.... .qu|
|00001b00| 69 74 0d 08 98 17 c8 99 | 20 22 57 69 6d 70 5f 43 |it......| "Wimp_C|
|00001b10| 6c 6f 73 65 44 6f 77 6e | 22 0d 08 a2 05 e0 0d 08 |loseDown|".......|
|00001b20| ac 05 e1 0d 08 b6 05 3a | 0d 08 c0 16 dd 20 f2 72 |.......:|..... .r|
|00001b30| 65 64 72 61 77 28 68 61 | 6e 64 6c 65 25 29 0d 08 |edraw(ha|ndle%)..|
|00001b40| ca 0b ea 20 66 6c 61 67 | 25 0d 08 d4 10 c8 8e 20 |... flag|%...... |
|00001b50| 68 61 6e 64 6c 65 25 20 | ca 0d 08 de 15 20 20 c9 |handle% |..... .|
|00001b60| 20 67 72 61 70 68 5f 68 | 61 6e 64 6c 65 25 0d 08 | graph_h|andle%..|
|00001b70| e8 20 20 20 70 6f 6c 6c | 5f 62 75 66 66 25 21 30 |. poll|_buff%!0|
|00001b80| 3d 67 72 61 70 68 5f 68 | 61 6e 64 6c 65 25 0d 08 |=graph_h|andle%..|
|00001b90| f2 2f 20 20 c8 99 22 57 | 69 6d 70 5f 52 65 64 72 |./ .."W|imp_Redr|
|00001ba0| 61 77 57 69 6e 64 6f 77 | 22 2c 2c 70 6f 6c 6c 5f |awWindow|",,poll_|
|00001bb0| 62 75 66 66 25 20 b8 20 | 66 6c 61 67 25 0d 08 fc |buff% . |flag%...|
|00001bc0| 0e 20 20 c8 95 20 66 6c | 61 67 25 0d 09 06 82 20 |. .. fl|ag%.... |
|00001bd0| 20 20 20 f2 64 72 61 77 | 5f 67 72 61 70 68 28 70 | .draw|_graph(p|
|00001be0| 6f 6c 6c 5f 62 75 66 66 | 25 21 34 2c 70 6f 6c 6c |oll_buff|%!4,poll|
|00001bf0| 5f 62 75 66 66 25 21 38 | 2c 70 6f 6c 6c 5f 62 75 |_buff%!8|,poll_bu|
|00001c00| 66 66 25 21 31 32 2c 70 | 6f 6c 6c 5f 62 75 66 66 |ff%!12,p|oll_buff|
|00001c10| 25 21 31 36 2c 70 6f 6c | 6c 5f 62 75 66 66 25 21 |%!16,pol|l_buff%!|
|00001c20| 32 30 2c 70 6f 6c 6c 5f | 62 75 66 66 25 21 32 34 |20,poll_|buff%!24|
|00001c30| 2c 70 6f 6c 6c 5f 62 75 | 66 66 25 21 32 38 2c 70 |,poll_bu|ff%!28,p|
|00001c40| 6f 6c 6c 5f 62 75 66 66 | 25 21 33 36 29 0d 09 10 |oll_buff|%!36)...|
|00001c50| 32 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |2 .. |"Wimp_Ge|
|00001c60| 74 52 65 63 74 61 6e 67 | 6c 65 22 2c 2c 70 6f 6c |tRectang|le",,pol|
|00001c70| 6c 5f 62 75 66 66 25 20 | b8 20 66 6c 61 67 25 0d |l_buff% |. flag%.|
|00001c80| 09 1a 07 20 20 ce 0d 09 | 24 04 0d 09 2e 16 20 20 |... ...|$..... |
|00001c90| c9 20 63 6f 6f 72 64 73 | 5f 68 61 6e 64 6c 65 25 |. coords|_handle%|
|00001ca0| 0d 09 38 12 20 20 f2 73 | 68 6f 77 5f 63 6f 6f 72 |..8. .s|how_coor|
|00001cb0| 64 73 0d 09 42 05 cb 0d | 09 4c 05 e1 0d 09 56 05 |ds..B...|.L....V.|
|00001cc0| 3a 0d 09 60 40 dd 20 f2 | 64 72 61 77 5f 67 72 61 |:..`@. .|draw_gra|
|00001cd0| 70 68 28 76 61 78 30 25 | 2c 76 61 79 30 25 2c 76 |ph(vax0%|,vay0%,v|
|00001ce0| 61 78 31 25 2c 76 61 79 | 31 25 2c 73 63 78 25 2c |ax1%,vay|1%,scx%,|
|00001cf0| 73 63 79 25 2c 67 77 78 | 30 25 2c 67 77 78 31 25 |scy%,gwx|0%,gwx1%|
|00001d00| 29 0d 09 6a 1d ea 20 74 | 6c 78 25 2c 74 6c 79 25 |)..j.. t|lx%,tly%|
|00001d10| 2c 6f 78 25 2c 6f 79 25 | 2c 58 25 2c 43 25 0d 09 |,ox%,oy%|,X%,C%..|
|00001d20| 74 10 f4 4c 4f 43 41 4c | 20 45 52 52 4f 52 0d 09 |t..LOCAL| ERROR..|
|00001d30| 7e 44 f4 4f 4e 20 45 52 | 52 4f 52 20 4c 4f 43 41 |~D.ON ER|ROR LOCA|
|00001d40| 4c 20 56 44 55 37 3a 50 | 52 4f 43 7a 6f 6f 6d 5f |L VDU7:P|ROCzoom_|
|00001d50| 6f 75 74 3a 50 52 4f 43 | 66 6f 72 63 65 5f 72 65 |out:PROC|force_re|
|00001d60| 64 72 61 77 5f 67 72 61 | 70 68 3a 45 4e 44 50 52 |draw_gra|ph:ENDPR|
|00001d70| 4f 43 0d 09 88 13 74 6c | 78 25 3d 76 61 78 30 25 |OC....tl|x%=vax0%|
|00001d80| 2d 73 63 78 25 0d 09 92 | 13 74 6c 79 25 3d 76 61 |-scx%...|.tly%=va|
|00001d90| 79 31 25 2d 73 63 79 25 | 0d 09 9c 24 6f 78 25 3d |y1%-scy%|...$ox%=|
|00001da0| 74 6c 78 25 3a 6f 79 25 | 3d 74 6c 79 25 2d 77 69 |tlx%:oy%|=tly%-wi|
|00001db0| 6e 64 6f 77 5f 68 65 69 | 67 68 74 25 0d 09 a6 2c |ndow_hei|ght%...,|
|00001dc0| 6d 69 6e 78 25 3d 67 77 | 78 30 25 2d 74 6c 78 25 |minx%=gw|x0%-tlx%|
|00001dd0| 2d 70 69 78 65 6c 25 3a | 6d 61 78 78 25 3d 67 77 |-pixel%:|maxx%=gw|
|00001de0| 78 31 25 2d 74 6c 78 25 | 0d 09 b0 17 e7 20 6d 69 |x1%-tlx%|..... mi|
|00001df0| 6e 78 25 3c 30 20 8c 20 | 6d 69 6e 78 25 3d 30 0d |nx%<0 . |minx%=0.|
|00001e00| 09 ba 29 e7 20 63 61 63 | 68 65 64 25 3d a3 20 8c |..). cac|hed%=. .|
|00001e10| 20 f2 63 61 63 68 65 5f | 76 61 6c 75 65 73 3a 63 | .cache_|values:c|
|00001e20| 61 63 68 65 64 25 3d b9 | 0d 09 c4 21 c8 99 20 22 |ached%=.|...!.. "|
|00001e30| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00001e40| 61 78 65 73 5f 63 6f 6c | 25 0d 09 ce 3e 86 20 6f |axes_col|%...>. o|
|00001e50| 78 25 2b 6f 72 69 78 2f | 78 73 63 61 6c 65 2c 6f |x%+orix/|xscale,o|
|00001e60| 79 25 2b 30 2c 6f 78 25 | 2b 6f 72 69 78 2f 78 73 |y%+0,ox%|+orix/xs|
|00001e70| 63 61 6c 65 2c 6f 79 25 | 2b 77 69 6e 64 6f 77 5f |cale,oy%|+window_|
|00001e80| 68 65 69 67 68 74 25 0d | 09 d8 2f 86 20 6f 78 25 |height%.|../. ox%|
|00001e90| 2b 30 2c 6f 79 25 2b 6f | 72 69 79 2c 6f 78 25 2b |+0,oy%+o|riy,ox%+|
|00001ea0| 77 69 6e 64 6f 77 5f 77 | 69 64 74 68 25 2c 6f 79 |window_w|idth%,oy|
|00001eb0| 25 2b 6f 72 69 79 0d 09 | e2 33 ec 20 6f 78 25 2b |%+oriy..|.3. ox%+|
|00001ec0| 6f 72 69 78 2f 78 73 63 | 61 6c 65 2b 32 2a 70 69 |orix/xsc|ale+2*pi|
|00001ed0| 78 65 6c 25 2c 6f 79 25 | 2b 77 69 6e 64 6f 77 5f |xel%,oy%|+window_|
|00001ee0| 68 65 69 67 68 74 25 2d | 38 0d 09 ec 0a f1 22 78 |height%-|8....."x|
|00001ef0| 3d 30 22 0d 09 f6 30 ec | 20 6f 78 25 2b 77 69 6e |=0"...0.| ox%+win|
|00001f00| 64 6f 77 5f 77 69 64 74 | 68 25 2d 31 36 2a 33 2d |dow_widt|h%-16*3-|
|00001f10| 32 2c 6f 79 25 2b 6f 72 | 69 79 2d 34 2a 70 69 78 |2,oy%+or|iy-4*pix|
|00001f20| 65 6c 25 0d 0a 00 0a f1 | 22 79 3d 30 22 0d 0a 0a |el%.....|"y=0"...|
|00001f30| 22 c8 99 20 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |".. "Wim|p_SetCol|
|00001f40| 6f 75 72 22 2c 67 72 61 | 70 68 5f 63 6f 6c 25 0d |our",gra|ph_col%.|
|00001f50| 0a 14 04 0d 0a 1e 0a 65 | 72 72 25 3d a3 0d 0a 28 |.......e|rr%=...(|
|00001f60| 1d e7 20 79 25 28 6d 69 | 6e 78 25 29 3c 3e 62 61 |.. y%(mi|nx%)<>ba|
|00001f70| 64 5f 76 61 6c 75 65 25 | 20 8c 0d 0a 32 1f 20 20 |d_value%| ...2. |
|00001f80| ec 20 6f 78 25 2b 6d 69 | 6e 78 25 2c 6f 79 25 2b |. ox%+mi|nx%,oy%+|
|00001f90| 79 25 28 6d 69 6e 78 25 | 29 0d 0a 3c 0c cc 20 65 |y%(minx%|)..<.. e|
|00001fa0| 72 72 25 3d b9 0d 0a 46 | 05 cd 0d 0a 50 04 0d 0a |rr%=...F|....P...|
|00001fb0| 5a 1f e3 20 58 25 3d 6d | 69 6e 78 25 20 b8 20 6d |Z.. X%=m|inx% . m|
|00001fc0| 61 78 78 25 20 88 20 70 | 69 78 65 6c 25 0d 0a 64 |axx% . p|ixel%..d|
|00001fd0| 0d 79 25 3d 79 25 28 58 | 25 29 0d 0a 65 0b 66 6c |.y%=y%(X|%)..e.fl|
|00001fe0| 61 67 25 3d a3 0d 0a 6e | 20 e7 20 79 25 3c 2d 6f |ag%=...n| . y%<-o|
|00001ff0| 79 25 20 8c 20 6f 79 25 | 3d 2d 6f 79 25 3a 66 6c |y% . oy%|=-oy%:fl|
|00002000| 61 67 25 3d b9 0d 0a 78 | 1f e7 20 79 25 3e 74 6c |ag%=...x|.. y%>tl|
|00002010| 79 25 20 8c 20 79 25 3d | 74 6c 79 25 3a 66 6c 61 |y% . y%=|tly%:fla|
|00002020| 67 25 3d b9 0d 0a 82 16 | e7 20 79 25 3c 3e 62 61 |g%=.....|. y%<>ba|
|00002030| 64 5f 76 61 6c 75 65 25 | 20 8c 0d 0a 8c 16 20 20 |d_value%| ..... |
|00002040| e7 20 64 6f 74 73 25 20 | 84 20 65 72 72 25 20 8c |. dots% |. err% .|
|00002050| 0d 0a 96 18 20 20 20 20 | c8 92 20 6f 78 25 2b 58 |.... |.. ox%+X|
|00002060| 25 2c 6f 79 25 2b 79 25 | 0d 0a a0 0e 20 20 20 20 |%,oy%+y%|.... |
|00002070| 65 72 72 25 3d a3 0d 0a | aa 12 20 20 cc 20 20 e7 |err%=...|.. . .|
|00002080| 20 66 6c 61 67 25 20 8c | 0d 0a ab 1d 20 20 20 20 | flag% .|.... |
|00002090| 20 20 20 20 20 20 ec 20 | 6f 78 25 2b 58 25 2c 6f | . |ox%+X%,o|
|000020a0| 79 25 2b 59 25 0d 0a ac | 14 20 20 20 20 20 20 20 |y%+Y%...|. |
|000020b0| 20 20 20 65 72 72 25 3d | b9 0d 0a ad 0f 20 20 20 | err%=|..... |
|000020c0| 20 20 20 20 20 20 20 cc | 0d 0a b4 1d 20 20 20 20 | .|.... |
|000020d0| 20 20 20 20 20 20 df 20 | 6f 78 25 2b 58 25 2c 6f | . |ox%+X%,o|
|000020e0| 79 25 2b 79 25 0d 0a be | 14 20 20 20 20 20 20 20 |y%+y%...|. |
|000020f0| 20 20 20 65 72 72 25 3d | a3 0d 0a bf 0d 20 20 20 | err%=|..... |
|00002100| 20 20 20 20 20 cd 0d 0a | c8 07 20 20 cd 0d 0a d2 | ...|.. ....|
|00002110| 0c cc 20 65 72 72 25 3d | b9 0d 0a dc 05 cd 0d 0a |.. err%=|........|
|00002120| e6 04 0d 0a f0 05 ed 0d | 0a fa 04 0d 0b 04 22 c8 |........|......".|
|00002130| 99 20 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |. "Wimp_|SetColou|
|00002140| 72 22 2c 6c 69 6e 65 73 | 5f 63 6f 6c 25 0d 0b 0e |r",lines|_col%...|
|00002150| 12 e7 20 78 6c 69 6e 65 | 73 25 3c 3e 30 20 8c 0d |.. xline|s%<>0 ..|
|00002160| 0b 18 16 20 20 e3 20 43 | 25 3d 31 20 b8 20 78 6c |... . C|%=1 . xl|
|00002170| 69 6e 65 73 25 0d 0b 22 | 24 20 20 78 3d 6f 72 69 |ines%.."|$ x=ori|
|00002180| 78 2f 78 73 63 61 6c 65 | 2b a0 28 78 24 28 43 25 |x/xscale|+.(x$(C%|
|00002190| 29 29 2f 78 73 63 61 6c | 65 0d 0b 2c 2c 20 20 86 |))/xscal|e..,, .|
|000021a0| 20 6f 78 25 2b 78 2c 6f | 79 25 2b 30 2c 6f 78 25 | ox%+x,o|y%+0,ox%|
|000021b0| 2b 78 2c 6f 79 25 2b 77 | 69 6e 64 6f 77 5f 68 65 |+x,oy%+w|indow_he|
|000021c0| 69 67 68 74 25 0d 0b 36 | 32 20 20 ec 20 6f 78 25 |ight%..6|2 . ox%|
|000021d0| 2b 78 2b 32 2a 70 69 78 | 65 6c 25 2c 6f 79 25 2b |+x+2*pix|el%,oy%+|
|000021e0| 77 69 6e 64 6f 77 5f 68 | 65 69 67 68 74 25 2d 34 |window_h|eight%-4|
|000021f0| 2a 70 69 78 65 6c 25 0d | 0b 40 12 20 20 f1 22 78 |*pixel%.|.@. ."x|
|00002200| 3d 22 3b 78 24 28 43 25 | 29 0d 0b 4a 07 20 20 ed |=";x$(C%|)..J. .|
|00002210| 0d 0b 54 05 cd 0d 0b 5e | 12 e7 20 79 6c 69 6e 65 |..T....^|.. yline|
|00002220| 73 25 3c 3e 30 20 8c 0d | 0b 68 16 20 20 e3 20 43 |s%<>0 ..|.h. . C|
|00002230| 25 3d 31 20 b8 20 79 6c | 69 6e 65 73 25 0d 0b 72 |%=1 . yl|ines%..r|
|00002240| 1d 20 20 79 3d 6f 72 69 | 79 2b a0 28 79 24 28 43 |. y=ori|y+.(y$(C|
|00002250| 25 29 29 2a 79 73 63 61 | 6c 65 0d 0b 7c 2b 20 20 |%))*ysca|le..|+ |
|00002260| 86 20 6f 78 25 2b 30 2c | 6f 79 25 2b 79 2c 6f 78 |. ox%+0,|oy%+y,ox|
|00002270| 25 2b 77 69 6e 64 6f 77 | 5f 77 69 64 74 68 25 2c |%+window|_width%,|
|00002280| 6f 79 25 2b 79 0d 0b 86 | 39 20 20 ec 20 6f 78 25 |oy%+y...|9 . ox%|
|00002290| 2b 77 69 6e 64 6f 77 5f | 77 69 64 74 68 25 2d 31 |+window_|width%-1|
|000022a0| 36 2a 28 a9 79 24 28 43 | 25 29 2b 32 29 2d 32 2c |6*(.y$(C|%)+2)-2,|
|000022b0| 6f 79 25 2b 79 2d 34 2a | 70 69 78 65 6c 25 0d 0b |oy%+y-4*|pixel%..|
|000022c0| 90 12 20 20 f1 22 79 3d | 22 3b 79 24 28 43 25 29 |.. ."y=|";y$(C%)|
|000022d0| 0d 0b 9a 07 20 20 ed 0d | 0b a4 05 cd 0d 0b ae 05 |.... ..|........|
|000022e0| e1 0d 0b b8 05 3a 0d 0b | c2 13 dd 20 f2 63 61 63 |.....:..|... .cac|
|000022f0| 68 65 5f 76 61 6c 75 65 | 73 0d 0b cc 0b ea 20 58 |he_value|s..... X|
|00002300| 25 2c 65 24 0d 0b d6 10 | 65 24 3d a4 63 61 70 73 |%,e$....|e$=.caps|
|00002310| 28 45 24 29 0d 0b e0 15 | c8 99 20 22 48 6f 75 72 |(E$)....|.. "Hour|
|00002320| 67 6c 61 73 73 5f 4f 6e | 22 0d 0b ea 14 6c 78 3d |glass_On|"....lx=|
|00002330| a0 28 a4 63 61 70 73 28 | 6c 78 24 29 29 0d 0b f4 |.(.caps(|lx$))...|
|00002340| 14 68 78 3d a0 28 a4 63 | 61 70 73 28 68 78 24 29 |.hx=.(.c|aps(hx$)|
|00002350| 29 0d 0b fe 14 6c 79 3d | a0 28 a4 63 61 70 73 28 |)....ly=|.(.caps(|
|00002360| 6c 79 24 29 29 0d 0c 08 | 14 68 79 3d a0 28 a4 63 |ly$))...|.hy=.(.c|
|00002370| 61 70 73 28 68 79 24 29 | 29 0d 0c 12 20 78 73 63 |aps(hy$)|)... xsc|
|00002380| 61 6c 65 3d 28 68 78 2d | 6c 78 29 2f 77 69 6e 64 |ale=(hx-|lx)/wind|
|00002390| 6f 77 5f 77 69 64 74 68 | 25 0d 0c 1c 21 79 73 63 |ow_width|%...!ysc|
|000023a0| 61 6c 65 3d 77 69 6e 64 | 6f 77 5f 68 65 69 67 68 |ale=wind|ow_heigh|
|000023b0| 74 25 2f 28 68 79 2d 6c | 79 29 0d 0c 26 0f 6f 72 |t%/(hy-l|y)..&.or|
|000023c0| 69 78 3d 28 30 2d 6c 78 | 29 0d 0c 30 16 6f 72 69 |ix=(0-lx|)..0.ori|
|000023d0| 79 3d 28 30 2d 6c 79 29 | 2a 79 73 63 61 6c 65 0d |y=(0-ly)|*yscale.|
|000023e0| 0c 3a 07 ea 20 85 0d 0c | 44 23 e3 20 58 25 3d 30 |.:.. ...|D#. X%=0|
|000023f0| 20 b8 20 77 69 6e 64 6f | 77 5f 77 69 64 74 68 25 | . windo|w_width%|
|00002400| 20 88 20 70 69 78 65 6c | 25 0d 0c 4e 22 ee 20 85 | . pixel|%..N". .|
|00002410| 20 ea 20 79 25 28 58 25 | 29 3d 62 61 64 5f 76 61 | . y%(X%|)=bad_va|
|00002420| 6c 75 65 25 3a e5 20 8d | 74 4a 4c 0d 0c 58 36 c8 |lue%:. .|tJL..X6.|
|00002430| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 50 65 72 |. "Hourg|lass_Per|
|00002440| 63 65 6e 74 61 67 65 22 | 2c 28 28 58 25 2f 77 69 |centage"|,((X%/wi|
|00002450| 6e 64 6f 77 5f 77 69 64 | 74 68 25 29 2a 31 30 30 |ndow_wid|th%)*100|
|00002460| 29 0d 0c 62 12 58 3d 6c | 78 2b 58 25 2a 78 73 63 |)..b.X=l|x+X%*xsc|
|00002470| 61 6c 65 0d 0c 6c 07 78 | 3d 58 0d 0c 76 1c 79 25 |ale..l.x|=X..v.y%|
|00002480| 28 58 25 29 3d 6f 72 69 | 79 2b 79 73 63 61 6c 65 |(X%)=ori|y+yscale|
|00002490| 2a a0 28 65 24 29 0d 0c | 80 28 e7 20 79 25 28 58 |*.(e$)..|.(. y%(X|
|000024a0| 25 29 3d 62 61 64 5f 76 | 61 6c 75 65 25 20 8c 20 |%)=bad_v|alue% . |
|000024b0| 79 25 28 58 25 29 2b 3d | 30 2e 30 30 30 31 0d 0c |y%(X%)+=|0.0001..|
|000024c0| 8a 05 ed 0d 0c 94 16 c8 | 99 20 22 48 6f 75 72 67 |........|. "Hourg|
|000024d0| 6c 61 73 73 5f 4f 66 66 | 22 0d 0c 9e 07 f7 20 85 |lass_Off|"..... .|
|000024e0| 0d 0c a8 05 e1 0d 0c b2 | 05 3a 0d 0c bc 16 dd 20 |........|.:..... |
|000024f0| f2 70 75 74 5f 69 63 6f | 6e 5f 6f 6e 5f 62 61 72 |.put_ico|n_on_bar|
|00002500| 0d 0c c6 0d 21 62 75 66 | 66 25 3d 2d 31 0d 0c d0 |....!buf|f%=-1...|
|00002510| 0d 62 75 66 66 25 21 34 | 3d 30 0d 0c da 0d 62 75 |.buff%!4|=0....bu|
|00002520| 66 66 25 21 38 3d 30 0d | 0c e4 0f 62 75 66 66 25 |ff%!8=0.|...buff%|
|00002530| 21 31 32 3d 36 33 0d 0c | ee 0f 62 75 66 66 25 21 |!12=63..|..buff%!|
|00002540| 31 36 3d 36 37 0d 0c f8 | 22 62 75 66 66 25 21 32 |16=67...|"buff%!2|
|00002550| 30 3d 28 31 3c 3c 31 29 | 2b 28 33 3c 3c 31 32 29 |0=(1<<1)|+(3<<12)|
|00002560| 2b 28 31 3c 3c 38 29 0d | 0d 02 20 24 28 62 75 66 |+(1<<8).|.. $(buf|
|00002570| 66 25 2b 31 30 30 29 3d | 28 22 62 61 72 5f 69 63 |f%+100)=|("bar_ic|
|00002580| 6f 6e 22 2b bd 30 29 0d | 0d 0c 16 62 75 66 66 25 |on"+.0).|...buff%|
|00002590| 21 32 34 3d 62 75 66 66 | 25 2b 31 30 30 0d 0d 16 |!24=buff|%+100...|
|000025a0| 19 62 75 66 66 25 21 32 | 38 3d 73 70 72 69 74 65 |.buff%!2|8=sprite|
|000025b0| 5f 62 75 66 66 25 0d 0d | 20 0e 62 75 66 66 25 21 |_buff%..| .buff%!|
|000025c0| 33 32 3d 38 0d 0d 2a 32 | c8 99 20 22 57 69 6d 70 |32=8..*2|.. "Wimp|
|000025d0| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 2c 62 75 |_CreateI|con",,bu|
|000025e0| 66 66 25 20 b8 20 62 61 | 72 5f 69 63 6f 6e 5f 68 |ff% . ba|r_icon_h|
|000025f0| 61 6e 64 6c 65 25 0d 0d | 34 05 e1 0d 0d 3e 05 3a |andle%..|4....>.:|
|00002600| 0d 0d 48 13 dd 20 f2 6c | 6f 61 64 5f 73 70 72 69 |..H.. .l|oad_spri|
|00002610| 74 65 73 0d 0d 52 16 ea | 20 6c 65 6e 5f 73 70 72 |tes..R..| len_spr|
|00002620| 69 74 65 5f 62 75 66 66 | 25 0d 0d 5c 1b 6c 65 6e |ite_buff|%..\.len|
|00002630| 5f 73 70 72 69 74 65 5f | 62 75 66 66 25 3d 34 2a |_sprite_|buff%=4*|
|00002640| 31 30 32 34 0d 0d 66 23 | de 20 73 70 72 69 74 65 |1024..f#|. sprite|
|00002650| 5f 62 75 66 66 25 20 6c | 65 6e 5f 73 70 72 69 74 |_buff% l|en_sprit|
|00002660| 65 5f 62 75 66 66 25 0d | 0d 70 25 21 73 70 72 69 |e_buff%.|.p%!spri|
|00002670| 74 65 5f 62 75 66 66 25 | 3d 6c 65 6e 5f 73 70 72 |te_buff%|=len_spr|
|00002680| 69 74 65 5f 62 75 66 66 | 25 2d 31 36 0d 0d 7a 42 |ite_buff|%-16..zB|
|00002690| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|000026a0| 2c 31 30 2b 32 35 36 2c | 73 70 72 69 74 65 5f 62 |,10+256,|sprite_b|
|000026b0| 75 66 66 25 2c 22 3c 4d | 61 74 68 47 72 61 70 68 |uff%,"<M|athGraph|
|000026c0| 24 44 69 72 3e 2e 53 70 | 72 69 74 65 73 22 0d 0d |$Dir>.Sp|rites"..|
|000026d0| 84 05 e1 0d 0d 8e 05 3a | 0d 0d 98 12 dd 20 f2 63 |.......:|..... .c|
|000026e0| 68 65 63 6b 5f 6d 6f 75 | 73 65 0d 0d a2 15 c8 8e |heck_mou|se......|
|000026f0| 20 70 6f 6c 6c 5f 62 75 | 66 66 25 21 38 20 ca 0d | poll_bu|ff%!8 ..|
|00002700| 0d ac 19 20 20 c9 20 31 | 3a 62 75 74 74 6f 6e 25 |... . 1|:button%|
|00002710| 3d 61 64 6a 75 73 74 25 | 0d 0d b6 1e 20 20 c9 20 |=adjust%|.... . |
|00002720| 32 3a 62 75 74 74 6f 6e | 25 3d 6d 65 6e 75 5f 62 |2:button|%=menu_b|
|00002730| 75 74 74 6f 6e 25 0d 0d | c0 19 20 20 c9 20 34 3a |utton%..|.. . 4:|
|00002740| 62 75 74 74 6f 6e 25 3d | 73 65 6c 65 63 74 25 0d |button%=|select%.|
|00002750| 0d ca 05 cb 0d 0d d4 04 | 0d 0d de 16 c8 8e 20 70 |........|...... p|
|00002760| 6f 6c 6c 5f 62 75 66 66 | 25 21 31 32 20 ca 0d 0d |oll_buff|%!12 ...|
|00002770| e8 15 20 20 c9 20 73 61 | 76 65 5f 68 61 6e 64 6c |.. . sa|ve_handl|
|00002780| 65 25 3a 0d 0d f2 1a 20 | 20 20 20 c8 8e 20 70 6f |e%:.... | .. po|
|00002790| 6c 6c 5f 62 75 66 66 25 | 21 31 36 20 ca 0d 0d fc |ll_buff%|!16 ....|
|000027a0| 18 20 20 20 20 20 20 c9 | 20 30 3a f2 64 72 61 67 |. .| 0:.drag|
|000027b0| 5f 73 61 76 65 0d 0e 06 | 18 20 20 20 20 20 20 c9 |_save...|. .|
|000027c0| 20 32 3a f2 6f 6b 61 79 | 5f 73 61 76 65 0d 0e 10 | 2:.okay|_save...|
|000027d0| 09 20 20 20 20 cb 0d 0e | 1a 0b 20 20 c9 20 2d 32 |. ...|.. . -2|
|000027e0| 3a 0d 0e 24 2a 20 20 20 | 20 e7 20 70 6f 6c 6c 5f |:..$* | . poll_|
|000027f0| 62 75 66 66 25 21 31 36 | 3d 62 61 72 5f 69 63 6f |buff%!16|=bar_ico|
|00002800| 6e 5f 68 61 6e 64 6c 65 | 25 20 8c 0d 0e 2e 1b 20 |n_handle|% ..... |
|00002810| 20 20 20 20 20 c8 8e 20 | 70 6f 6c 6c 5f 62 75 66 | .. |poll_buf|
|00002820| 66 25 21 38 20 ca 0d 0e | 38 36 20 20 20 20 20 20 |f%!8 ...|86 |
|00002830| 20 20 c9 20 31 2c 34 3a | f2 6f 70 65 6e 5f 77 69 | . 1,4:|.open_wi|
|00002840| 6e 64 6f 77 5f 61 73 5f | 69 73 28 67 72 61 70 68 |ndow_as_|is(graph|
|00002850| 5f 68 61 6e 64 6c 65 25 | 2c 2d 31 29 0d 0e 42 aa |_handle%|,-1)..B.|
|00002860| 20 20 20 20 20 20 20 20 | c9 20 32 3a 62 61 72 5f | |. 2:bar_|
|00002870| 6d 65 6e 75 5f 68 61 6e | 64 6c 65 25 3d a4 6d 65 |menu_han|dle%=.me|
|00002880| 6e 75 28 62 61 72 5f 6d | 65 6e 75 5f 62 6c 6f 63 |nu(bar_m|enu_bloc|
|00002890| 6b 25 2c 41 70 70 4e 61 | 6d 65 24 2c 62 61 72 5f |k%,AppNa|me$,bar_|
|000028a0| 6d 65 6e 75 5f 69 74 65 | 6d 73 24 28 29 2c 62 61 |menu_ite|ms$(),ba|
|000028b0| 72 5f 6d 65 6e 75 5f 66 | 6c 61 67 73 25 28 29 2c |r_menu_f|lags%(),|
|000028c0| 62 61 72 5f 6d 65 6e 75 | 5f 73 75 62 73 25 28 29 |bar_menu|_subs%()|
|000028d0| 2c 28 70 6f 6c 6c 5f 62 | 75 66 66 25 21 30 29 2d |,(poll_b|uff%!0)-|
|000028e0| 36 34 2c 39 36 2b 38 30 | 2c a3 2c 30 2c 30 2c 30 |64,96+80|,.,0,0,0|
|000028f0| 2c b9 29 3a 6d 65 6e 75 | 5f 6f 6e 25 3d 62 61 72 |,.):menu|_on%=bar|
|00002900| 5f 6d 65 6e 75 25 0d 0e | 4c 0b 20 20 20 20 20 20 |_menu%..|L. |
|00002910| cb 0d 0e 56 09 20 20 20 | 20 cd 0d 0e 60 04 0d 0e |...V. | ...`...|
|00002920| 6a 16 20 20 c9 20 67 72 | 61 70 68 5f 68 61 6e 64 |j. . gr|aph_hand|
|00002930| 6c 65 25 3a 0d 0e 74 19 | 20 20 20 20 c8 8e 20 70 |le%:..t.| .. p|
|00002940| 6f 6c 6c 5f 62 75 66 66 | 25 21 38 20 ca 0d 0e 7e |oll_buff|%!8 ...~|
|00002950| 81 20 20 20 20 20 20 c9 | 20 31 2a 32 35 36 3a e7 |. .| 1*256:.|
|00002960| 20 7a 6f 6f 6d 5f 63 6f | 75 6e 74 65 72 25 3e 31 | zoom_co|unter%>1|
|00002970| 20 8c 20 f2 7a 6f 6f 6d | 5f 6f 75 74 3a 7a 6f 6f | . .zoom|_out:zoo|
|00002980| 6d 5f 63 6f 75 6e 74 65 | 72 25 2d 3d 31 3a e7 20 |m_counte|r%-=1:. |
|00002990| 7a 6f 6f 6d 5f 63 6f 75 | 6e 74 65 72 25 3d 31 20 |zoom_cou|nter%=1 |
|000029a0| 8c 20 6d 61 69 6e 5f 6d | 65 6e 75 5f 69 74 65 6d |. main_m|enu_item|
|000029b0| 73 24 28 75 6e 64 6f 5f | 65 6e 74 72 79 25 2b 31 |s$(undo_|entry%+1|
|000029c0| 29 3d 22 7e 55 6e 64 6f | 20 7a 6f 6f 6d 22 0d 0e |)="~Undo| zoom"..|
|000029d0| 88 59 20 20 20 20 20 20 | c9 20 34 2a 31 36 3a e7 |.Y |. 4*16:.|
|000029e0| 20 7a 6f 6f 6d 5f 63 6f | 75 6e 74 65 72 25 3e 30 | zoom_co|unter%>0|
|000029f0| 20 80 20 7a 6f 6f 6d 5f | 63 6f 75 6e 74 65 72 25 | . zoom_|counter%|
|00002a00| 3c 6d 61 78 5f 7a 6f 6f | 6d 25 20 8c 20 f2 64 72 |<max_zoo|m% . .dr|
|00002a10| 61 67 5f 62 6f 78 3a 7a | 6f 6f 6d 5f 63 6f 75 6e |ag_box:z|oom_coun|
|00002a20| 74 65 72 25 2b 3d 31 0d | 0e 92 27 20 20 20 20 20 |ter%+=1.|..' |
|00002a30| 20 e7 20 7a 6f 6f 6d 5f | 63 6f 75 6e 74 65 72 25 | . zoom_|counter%|
|00002a40| 3c 30 20 8c 20 f2 64 72 | 61 67 5f 62 6f 78 0d 0e |<0 . .dr|ag_box..|
|00002a50| 9c b3 20 20 20 20 20 20 | c9 20 32 3a 6d 61 69 6e |.. |. 2:main|
|00002a60| 5f 6d 65 6e 75 5f 68 61 | 6e 64 6c 65 25 3d a4 6d |_menu_ha|ndle%=.m|
|00002a70| 65 6e 75 28 6d 61 69 6e | 5f 6d 65 6e 75 5f 62 6c |enu(main|_menu_bl|
|00002a80| 6f 63 6b 25 2c 41 70 70 | 4e 61 6d 65 24 2c 6d 61 |ock%,App|Name$,ma|
|00002a90| 69 6e 5f 6d 65 6e 75 5f | 69 74 65 6d 73 24 28 29 |in_menu_|items$()|
|00002aa0| 2c 6d 61 69 6e 5f 6d 65 | 6e 75 5f 66 6c 61 67 73 |,main_me|nu_flags|
|00002ab0| 25 28 29 2c 6d 61 69 6e | 5f 6d 65 6e 75 5f 73 75 |%(),main|_menu_su|
|00002ac0| 62 73 25 28 29 2c 70 6f | 6c 6c 5f 62 75 66 66 25 |bs%(),po|ll_buff%|
|00002ad0| 21 30 2d 36 34 2c 70 6f | 6c 6c 5f 62 75 66 66 25 |!0-64,po|ll_buff%|
|00002ae0| 21 34 2c a3 2c 30 2c 30 | 2c 30 2c b9 29 3a 6d 65 |!4,.,0,0|,0,.):me|
|00002af0| 6e 75 5f 6f 6e 25 3d 6d | 61 69 6e 5f 6d 65 6e 75 |nu_on%=m|ain_menu|
|00002b00| 25 0d 0e a6 09 20 20 20 | 20 cb 0d 0e b0 04 0d 0e |%.... | .......|
|00002b10| ba 19 20 20 c9 20 64 69 | 61 6c 6f 67 75 65 5f 68 |.. . di|alogue_h|
|00002b20| 61 6e 64 6c 65 25 3a 0d | 0e c4 19 20 20 20 20 c8 |andle%:.|... .|
|00002b30| 8e 20 70 6f 6c 6c 5f 62 | 75 66 66 25 21 38 20 ca |. poll_b|uff%!8 .|
|00002b40| 0d 0e ce 47 20 20 20 20 | 20 20 c9 20 34 2c 31 3a |...G | . 4,1:|
|00002b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002b60| 20 20 20 20 20 20 20 20 | 3a f4 20 53 65 6c 65 63 | |:. Selec|
|00002b70| 74 20 6f 72 20 41 64 6a | 75 73 74 20 20 63 6c 69 |t or Adj|ust cli|
|00002b80| 63 6b 65 64 2e 2e 2e 0d | 0e d8 1e 20 20 20 20 20 |cked....|... |
|00002b90| 20 20 20 c8 8e 20 70 6f | 6c 6c 5f 62 75 66 66 25 | .. po|ll_buff%|
|00002ba0| 21 31 36 20 ca 0d 0e e2 | 39 20 20 20 20 20 20 20 |!16 ....|9 |
|00002bb0| 20 20 20 c9 20 30 3a 20 | 20 20 20 20 20 20 20 20 | . 0: | |
|00002bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002bd0| 3a f4 20 4f 6e 20 74 68 | 65 20 27 4f 4b 27 0d 0e |:. On th|e 'OK'..|
|00002be0| ec 37 20 20 20 20 20 20 | 20 20 20 20 20 20 c8 99 |.7 | ..|
|00002bf0| 20 22 57 69 6d 70 5f 47 | 65 74 43 61 72 65 74 50 | "Wimp_G|etCaretP|
|00002c00| 6f 73 69 74 69 6f 6e 22 | 2c 2c 63 61 72 65 74 5f |osition"|,,caret_|
|00002c10| 62 75 66 66 25 0d 0e f6 | 3c 20 20 20 20 20 20 20 |buff%...|< |
|00002c20| 20 20 20 20 20 e7 20 62 | 75 74 74 6f 6e 25 3d 73 | . b|utton%=s|
|00002c30| 65 6c 65 63 74 25 20 8c | 20 c8 99 20 22 57 69 6d |elect% .| .. "Wim|
|00002c40| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 2d |p_Create|Menu",,-|
|00002c50| 31 0d 0f 00 15 20 20 20 | 20 20 20 20 20 20 20 20 |1.... | |
|00002c60| 20 f2 6f 6b 61 79 0d 0f | 0a 95 20 20 20 20 20 20 | .okay..|.. |
|00002c70| 20 20 20 20 20 20 e7 20 | 62 75 74 74 6f 6e 25 3d | . |button%=|
|00002c80| 61 64 6a 75 73 74 25 20 | 8c 20 c8 99 20 22 57 69 |adjust% |. .. "Wi|
|00002c90| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00002ca0| 69 6f 6e 22 2c 63 61 72 | 65 74 5f 62 75 66 66 25 |ion",car|et_buff%|
|00002cb0| 21 30 2c 63 61 72 65 74 | 5f 62 75 66 66 25 21 34 |!0,caret|_buff%!4|
|00002cc0| 2c 63 61 72 65 74 5f 62 | 75 66 66 25 21 38 2c 63 |,caret_b|uff%!8,c|
|00002cd0| 61 72 65 74 5f 62 75 66 | 66 25 21 31 32 2c 63 61 |aret_buf|f%!12,ca|
|00002ce0| 72 65 74 5f 62 75 66 66 | 25 21 31 36 2c 63 61 72 |ret_buff|%!16,car|
|00002cf0| 65 74 5f 62 75 66 66 25 | 21 32 30 0d 0f 14 3f 20 |et_buff%|!20...? |
|00002d00| 20 20 20 20 20 20 20 20 | 20 c9 20 31 30 3a 20 20 | | . 10: |
|00002d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002d20| 20 20 20 20 20 20 20 20 | 3a f4 20 4f 6e 20 74 68 | |:. On th|
|00002d30| 65 20 27 43 61 6e 63 65 | 6c 27 0d 0f 1e 37 20 20 |e 'Cance|l'...7 |
|00002d40| 20 20 20 20 20 20 20 20 | 20 20 c8 99 20 22 57 69 | | .. "Wi|
|00002d50| 6d 70 5f 47 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_GetCa|retPosit|
|00002d60| 69 6f 6e 22 2c 2c 63 61 | 72 65 74 5f 62 75 66 66 |ion",,ca|ret_buff|
|00002d70| 25 0d 0f 28 23 20 20 20 | 20 20 20 20 20 20 20 20 |%..(# | |
|00002d80| 20 e7 20 62 75 74 74 6f | 6e 25 3d 73 65 6c 65 63 | . butto|n%=selec|
|00002d90| 74 25 20 8c 0d 0f 32 2a | 20 20 20 20 20 20 20 20 |t% ...2*| |
|00002da0| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 | ..| "Wimp_C|
|00002db0| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 2d 31 0d 0f |reateMen|u",,-1..|
|00002dc0| 3c 11 20 20 20 20 20 20 | 20 20 20 20 20 20 cd 0d |<. | ..|
|00002dd0| 0f 46 1b 20 20 20 20 20 | 20 20 20 20 20 20 20 f2 |.F. | .|
|00002de0| 72 65 73 74 6f 72 65 28 | b9 29 0d 0f 50 95 20 20 |restore(|.)..P. |
|00002df0| 20 20 20 20 20 20 20 20 | 20 20 e7 20 62 75 74 74 | | . butt|
|00002e00| 6f 6e 25 3d 61 64 6a 75 | 73 74 25 20 8c 20 c8 99 |on%=adju|st% . ..|
|00002e10| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|00002e20| 6f 73 69 74 69 6f 6e 22 | 2c 63 61 72 65 74 5f 62 |osition"|,caret_b|
|00002e30| 75 66 66 25 21 30 2c 63 | 61 72 65 74 5f 62 75 66 |uff%!0,c|aret_buf|
|00002e40| 66 25 21 34 2c 63 61 72 | 65 74 5f 62 75 66 66 25 |f%!4,car|et_buff%|
|00002e50| 21 38 2c 63 61 72 65 74 | 5f 62 75 66 66 25 21 31 |!8,caret|_buff%!1|
|00002e60| 32 2c 63 61 72 65 74 5f | 62 75 66 66 25 21 31 36 |2,caret_|buff%!16|
|00002e70| 2c 63 61 72 65 74 5f 62 | 75 66 66 25 21 32 30 0d |,caret_b|uff%!20.|
|00002e80| 0f 5a 12 20 20 20 20 20 | 20 20 20 20 20 7f 20 ef |.Z. | . .|
|00002e90| 37 0d 0f 64 0d 20 20 20 | 20 20 20 20 20 cb 0d 0f |7..d. | ...|
|00002ea0| 6e 09 20 20 20 20 cb 0d | 0f 78 04 0d 0f 82 05 cb |n. ..|.x......|
|00002eb0| 0d 0f 8c 05 e1 0d 0f 96 | 05 3a 0d 0f a0 61 dd 20 |........|.:...a. |
|00002ec0| a4 6d 65 6e 75 28 62 25 | 2c 74 69 74 6c 65 24 2c |.menu(b%|,title$,|
|00002ed0| 69 74 65 6d 73 24 28 29 | 2c 66 6c 61 67 73 25 28 |items$()|,flags%(|
|00002ee0| 29 2c 73 75 62 25 28 29 | 2c 78 25 2c 79 25 2c 77 |),sub%()|,x%,y%,w|
|00002ef0| 72 69 74 65 61 62 6c 65 | 25 2c 62 75 66 66 31 25 |riteable|%,buff1%|
|00002f00| 2c 62 75 66 66 32 25 2c | 62 75 66 66 73 5f 6c 65 |,buff2%,|buffs_le|
|00002f10| 6e 25 2c 63 72 65 61 74 | 65 25 29 0d 0f aa 27 ea |n%,creat|e%)...'.|
|00002f20| 20 69 25 2c 6e 75 6d 69 | 74 65 6d 73 25 2c 70 74 | i%,numi|tems%,pt|
|00002f30| 72 25 2c 77 69 64 65 73 | 74 25 2c 68 61 6e 64 6c |r%,wides|t%,handl|
|00002f40| 65 25 0d 0f b4 04 0d 0f | be 1b 6e 75 6d 69 74 65 |e%......|..numite|
|00002f50| 6d 73 25 3d de 28 69 74 | 65 6d 73 24 28 29 2c 31 |ms%=.(it|ems$(),1|
|00002f60| 29 0d 0f c8 2d 66 6c 61 | 67 73 25 28 6e 75 6d 69 |)...-fla|gs%(numi|
|00002f70| 74 65 6d 73 25 29 3d 66 | 6c 61 67 73 25 28 6e 75 |tems%)=f|lags%(nu|
|00002f80| 6d 69 74 65 6d 73 25 29 | 20 84 20 26 38 30 0d 0f |mitems%)| . &80..|
|00002f90| d2 04 0d 0f dc 0e 24 62 | 25 3d 74 69 74 6c 65 24 |......$b|%=title$|
|00002fa0| 0d 0f e6 04 0d 0f f0 04 | 0d 0f fa 1e f4 20 63 6f |........|..... co|
|00002fb0| 6c 6f 75 72 73 20 66 6f | 72 65 20 61 6e 64 20 62 |lours fo|re and b|
|00002fc0| 61 63 6b 2e 2e 2e 0d 10 | 04 0b 62 25 3f 31 32 3d |ack.....|..b%?12=|
|00002fd0| 37 0d 10 0e 0b 62 25 3f | 31 33 3d 32 0d 10 18 0b |7....b%?|13=2....|
|00002fe0| 62 25 3f 31 34 3d 37 0d | 10 22 0b 62 25 3f 31 35 |b%?14=7.|.".b%?15|
|00002ff0| 3d 30 0d 10 2c 04 0d 10 | 36 0c 62 25 21 32 30 3d |=0..,...|6.b%!20=|
|00003000| 34 30 0d 10 40 0b 62 25 | 21 32 34 3d 30 0d 10 4a |40..@.b%|!24=0..J|
|00003010| 04 0d 10 54 0e 70 74 72 | 25 3d 62 25 2b 32 38 0d |...T.ptr|%=b%+28.|
|00003020| 10 5e 13 77 69 64 65 73 | 74 25 3d a9 74 69 74 6c |.^.wides|t%=.titl|
|00003030| 65 24 0d 10 68 04 0d 10 | 72 16 e3 20 69 25 3d 31 |e$..h...|r.. i%=1|
|00003040| 20 b8 20 6e 75 6d 69 74 | 65 6d 73 25 0d 10 7c 04 | . numit|ems%..|.|
|00003050| 0d 10 86 4c 20 20 e7 20 | c0 69 74 65 6d 73 24 28 |...L . |.items$(|
|00003060| 69 25 29 2c 31 29 3d 22 | 7e 22 20 8c 20 69 24 3d |i%),1)="|~" . i$=|
|00003070| c2 69 74 65 6d 73 24 28 | 69 25 29 2c a9 28 69 74 |.items$(|i%),.(it|
|00003080| 65 6d 73 24 28 69 25 29 | 29 2d 31 29 20 8b 20 69 |ems$(i%)|)-1) . i|
|00003090| 24 3d 69 74 65 6d 73 24 | 28 69 25 29 0d 10 90 04 |$=items$|(i%)....|
|000030a0| 0d 10 9a 16 20 20 21 70 | 74 72 25 3d 66 6c 61 67 |.... !p|tr%=flag|
|000030b0| 73 25 28 69 25 29 0d 10 | a4 15 20 20 70 74 72 25 |s%(i%)..|.. ptr%|
|000030c0| 21 34 3d 73 75 62 25 28 | 69 25 29 0d 10 ae 1e 20 |!4=sub%(|i%).... |
|000030d0| 20 70 74 72 25 21 38 3d | 31 2b 28 33 3c 3c 31 32 | ptr%!8=|1+(3<<12|
|000030e0| 29 2b 28 37 3c 3c 32 34 | 29 0d 10 b8 1c 20 20 e7 |)+(7<<24|).... .|
|000030f0| 20 c0 69 74 65 6d 73 24 | 28 69 25 29 2c 31 29 3d | .items$|(i%),1)=|
|00003100| 22 7e 22 20 8c 0d 10 c2 | 17 20 20 20 20 70 74 72 |"~" ....|. ptr|
|00003110| 25 21 38 2b 3d 28 31 3c | 3c 32 32 29 0d 10 cc 07 |%!8+=(1<|<22)....|
|00003120| 20 20 cd 0d 10 d6 14 20 | 20 e7 20 77 72 69 74 65 | ..... | . write|
|00003130| 61 62 6c 65 25 20 8c 0d | 10 e0 1f 20 20 20 20 70 |able% ..|... p|
|00003140| 74 72 25 21 28 38 29 2b | 3d 28 31 3c 3c 33 29 2b |tr%!(8)+|=(1<<3)+|
|00003150| 28 31 3c 3c 38 29 0d 10 | ea 18 20 20 20 20 70 74 |(1<<8)..|.. pt|
|00003160| 72 25 21 28 31 32 29 3d | 62 75 66 66 31 25 0d 10 |r%!(12)=|buff1%..|
|00003170| f4 19 20 20 20 20 62 25 | 21 28 32 38 2b 31 36 29 |.. b%|!(28+16)|
|00003180| 3d 62 75 66 66 32 25 0d | 10 fe 1d 20 20 20 20 62 |=buff2%.|... b|
|00003190| 25 21 28 32 38 2b 32 30 | 29 3d 62 75 66 66 73 5f |%!(28+20|)=buffs_|
|000031a0| 6c 65 6e 25 0d 11 08 12 | 20 20 20 20 24 62 75 66 |len%....| $buf|
|000031b0| 66 31 25 3d 69 24 0d 11 | 12 15 20 20 cc 20 24 28 |f1%=i$..|.. . $(|
|000031c0| 70 74 72 25 2b 31 32 29 | 3d 69 24 0d 11 1c 07 20 |ptr%+12)|=i$.... |
|000031d0| 20 cd 0d 11 26 17 20 20 | e7 20 a9 28 69 24 29 3e | ...&. |. .(i$)>|
|000031e0| 77 69 64 65 73 74 25 20 | 8c 0d 11 30 15 20 20 20 |widest% |...0. |
|000031f0| 20 77 69 64 65 73 74 25 | 3d a9 28 69 24 29 0d 11 | widest%|=.(i$)..|
|00003200| 3a 07 20 20 cd 0d 11 44 | 04 0d 11 4e 0e 20 20 70 |:. ...D|...N. p|
|00003210| 74 72 25 2b 3d 32 34 0d | 11 58 04 0d 11 62 05 ed |tr%+=24.|.X...b..|
|00003220| 0d 11 6c 04 0d 11 76 17 | 62 25 21 31 36 3d 77 69 |..l...v.|b%!16=wi|
|00003230| 64 65 73 74 25 2a 31 36 | 2b 33 32 0d 11 80 04 0d |dest%*16|+32.....|
|00003240| 11 8a 37 e7 20 63 72 65 | 61 74 65 25 20 8c 20 c8 |..7. cre|ate% . .|
|00003250| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|00003260| 75 22 2c 2c 62 25 2c 78 | 25 2c 79 25 20 b8 20 68 |u",,b%,x|%,y% . h|
|00003270| 61 6e 64 6c 65 25 0d 11 | 94 04 0d 11 9e 04 0d 11 |andle%..|........|
|00003280| a8 0c 3d 68 61 6e 64 6c | 65 25 0d 11 b2 05 3a 0d |..=handl|e%....:.|
|00003290| 11 bc 11 dd 20 f2 63 68 | 65 63 6b 5f 6d 65 6e 75 |.... .ch|eck_menu|
|000032a0| 0d 11 c6 23 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |...#.. "|Wimp_Get|
|000032b0| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 62 75 |PointerI|nfo",,bu|
|000032c0| 66 66 25 0d 11 d0 13 62 | 75 74 74 6f 6e 25 3d 62 |ff%....b|utton%=b|
|000032d0| 75 66 66 25 21 38 0d 11 | da 11 c8 8e 20 6d 65 6e |uff%!8..|.... men|
|000032e0| 75 5f 6f 6e 25 20 ca 0d | 11 e4 12 20 20 c9 20 62 |u_on% ..|... . b|
|000032f0| 61 72 5f 6d 65 6e 75 25 | 3a 0d 11 ee 19 20 20 20 |ar_menu%|:.... |
|00003300| 20 c8 8e 20 70 6f 6c 6c | 5f 62 75 66 66 25 21 30 | .. poll|_buff%!0|
|00003310| 20 ca 0d 11 f8 13 20 20 | 20 20 20 20 c9 20 31 3a | ..... | . 1:|
|00003320| f2 71 75 69 74 0d 12 02 | 09 20 20 20 20 cb 0d 12 |.quit...|. ...|
|00003330| 0c 15 20 20 20 20 e7 20 | 62 75 74 74 6f 6e 25 3d |.. . |button%=|
|00003340| 31 20 8c 0d 12 16 a9 20 | 20 20 20 20 20 62 61 72 |1 ..... | bar|
|00003350| 5f 6d 65 6e 75 5f 68 61 | 6e 64 6c 65 25 3d a4 6d |_menu_ha|ndle%=.m|
|00003360| 65 6e 75 28 62 61 72 5f | 6d 65 6e 75 5f 62 6c 6f |enu(bar_|menu_blo|
|00003370| 63 6b 25 2c 41 70 70 4e | 61 6d 65 24 2c 62 61 72 |ck%,AppN|ame$,bar|
|00003380| 5f 6d 65 6e 75 5f 69 74 | 65 6d 73 24 28 29 2c 62 |_menu_it|ems$(),b|
|00003390| 61 72 5f 6d 65 6e 75 5f | 66 6c 61 67 73 25 28 29 |ar_menu_|flags%()|
|000033a0| 2c 62 61 72 5f 6d 65 6e | 75 5f 73 75 62 73 25 28 |,bar_men|u_subs%(|
|000033b0| 29 2c 70 6f 6c 6c 5f 62 | 75 66 66 25 21 30 2d 36 |),poll_b|uff%!0-6|
|000033c0| 34 2c 70 6f 6c 6c 5f 62 | 75 66 66 25 21 34 2c a3 |4,poll_b|uff%!4,.|
|000033d0| 2c 30 2c 30 2c 30 2c b9 | 29 3a 6d 65 6e 75 5f 6f |,0,0,0,.|):menu_o|
|000033e0| 6e 25 3d 62 61 72 5f 6d | 65 6e 75 25 0d 12 20 09 |n%=bar_m|enu%.. .|
|000033f0| 20 20 20 20 cd 0d 12 2a | 04 0d 12 34 12 20 20 c9 | ...*|...4. .|
|00003400| 6d 61 69 6e 5f 6d 65 6e | 75 25 3a 0d 12 3e 19 20 |main_men|u%:..>. |
|00003410| 20 20 20 c8 8e 20 70 6f | 6c 6c 5f 62 75 66 66 25 | .. po|ll_buff%|
|00003420| 21 30 20 ca 0d 12 48 04 | 0d 12 52 2b 20 20 20 20 |!0 ...H.|..R+ |
|00003430| 20 20 c9 20 75 6e 64 6f | 5f 65 6e 74 72 79 25 3a | . undo|_entry%:|
|00003440| e7 20 7a 6f 6f 6d 5f 63 | 6f 75 6e 74 65 72 25 3e |. zoom_c|ounter%>|
|00003450| 31 20 8c 0d 12 5c 33 20 | 20 20 20 20 20 20 20 e7 |1 ...\3 | .|
|00003460| 20 62 75 74 74 6f 6e 25 | 3c 3e 31 20 8c 20 c8 99 | button%|<>1 . ..|
|00003470| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00003480| 75 22 2c 2c 2d 31 0d 12 | 66 38 20 20 20 20 20 20 |u",,-1..|f8 |
|00003490| 20 20 20 20 7a 6f 6f 6d | 5f 63 6f 75 6e 74 65 72 | zoom|_counter|
|000034a0| 25 3d 32 3a f2 7a 6f 6f | 6d 5f 6f 75 74 3a 7a 6f |%=2:.zoo|m_out:zo|
|000034b0| 6f 6d 5f 63 6f 75 6e 74 | 65 72 25 2d 3d 31 0d 12 |om_count|er%-=1..|
|000034c0| 70 3a 20 20 20 20 20 20 | 20 20 20 20 6d 61 69 6e |p: | main|
|000034d0| 5f 6d 65 6e 75 5f 69 74 | 65 6d 73 24 28 75 6e 64 |_menu_it|ems$(und|
|000034e0| 6f 5f 65 6e 74 72 79 25 | 2b 31 29 3d 22 7e 55 6e |o_entry%|+1)="~Un|
|000034f0| 64 6f 20 7a 6f 6f 6d 22 | 0d 12 7a 0d 20 20 20 20 |do zoom"|..z. |
|00003500| 20 20 20 20 cd 0d 12 84 | 04 0d 12 8e 19 20 20 20 | ....|..... |
|00003510| 20 20 20 c9 20 78 6c 69 | 6e 65 5f 65 6e 74 72 79 | . xli|ne_entry|
|00003520| 25 3a 0d 12 98 1a 20 20 | 20 20 20 20 20 20 67 65 |%:.... | ge|
|00003530| 74 24 3d a4 67 65 74 5f | 6c 69 6e 65 0d 12 a2 20 |t$=.get_|line... |
|00003540| 20 20 20 20 20 20 20 20 | e7 20 67 65 74 24 3c 3e | |. get$<>|
|00003550| 22 53 68 6f 77 20 78 3d | 6b 22 20 8c 0d 12 ac 3c |"Show x=|k" ....<|
|00003560| 20 20 20 20 20 20 20 20 | 20 20 6d 61 69 6e 5f 6d | | main_m|
|00003570| 65 6e 75 5f 69 74 65 6d | 73 24 28 63 6c 65 61 72 |enu_item|s$(clear|
|00003580| 5f 65 6e 74 72 79 25 2b | 31 29 3d 22 43 6c 65 61 |_entry%+|1)="Clea|
|00003590| 72 20 6c 69 6e 65 73 22 | 0d 12 b6 24 20 20 20 20 |r lines"|...$ |
|000035a0| 20 20 20 20 20 20 e7 20 | 78 6c 69 6e 65 73 25 3c | . |xlines%<|
|000035b0| 6d 61 78 5f 6c 69 6e 65 | 73 25 20 8c 0d 12 c0 1a |max_line|s% .....|
|000035c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 78 6c 69 6e | | xlin|
|000035d0| 65 73 25 2b 3d 31 0d 12 | ca 20 20 20 20 20 20 20 |es%+=1..|. |
|000035e0| 20 20 20 20 20 20 78 24 | 28 78 6c 69 6e 65 73 25 | x$|(xlines%|
|000035f0| 29 3d 67 65 74 24 0d 12 | d4 32 20 20 20 20 20 20 |)=get$..|.2 |
|00003600| 20 20 20 20 20 20 78 3d | 2d 6c 78 2f 78 73 63 61 | x=|-lx/xsca|
|00003610| 6c 65 2b a0 28 78 24 28 | 78 6c 69 6e 65 73 25 29 |le+.(x$(|xlines%)|
|00003620| 29 2f 78 73 63 61 6c 65 | 0d 12 de 66 20 20 20 20 |)/xscale|...f |
|00003630| 20 20 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 | |.. "Wimp|
|00003640| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 67 72 |_ForceRe|draw",gr|
|00003650| 61 70 68 5f 68 61 6e 64 | 6c 65 25 2c 78 2c 2d 77 |aph_hand|le%,x,-w|
|00003660| 69 6e 64 6f 77 5f 68 65 | 69 67 68 74 25 2c 78 2b |indow_he|ight%,x+|
|00003670| 31 36 2a 28 a9 78 24 28 | 78 6c 69 6e 65 73 25 29 |16*(.x$(|xlines%)|
|00003680| 2b 32 29 2b 32 2a 70 69 | 78 65 6c 25 2c 30 0d 12 |+2)+2*pi|xel%,0..|
|00003690| e8 53 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |.S | . |
|000036a0| 78 6c 69 6e 65 73 25 3d | 6d 61 78 5f 6c 69 6e 65 |xlines%=|max_line|
|000036b0| 73 25 20 8c 20 6d 61 69 | 6e 5f 6d 65 6e 75 5f 69 |s% . mai|n_menu_i|
|000036c0| 74 65 6d 73 24 28 78 6c | 69 6e 65 5f 65 6e 74 72 |tems$(xl|ine_entr|
|000036d0| 79 25 2b 31 29 3d 22 7e | 53 68 6f 77 20 78 3d 6b |y%+1)="~|Show x=k|
|000036e0| 22 0d 12 f2 0f 20 20 20 | 20 20 20 20 20 20 20 cd |".... | .|
|000036f0| 0d 12 fc 0d 20 20 20 20 | 20 20 20 20 cd 0d 13 06 |.... | ....|
|00003700| 04 0d 13 10 18 20 20 20 | 20 20 20 c9 20 79 6c 69 |..... | . yli|
|00003710| 6e 65 5f 65 6e 74 72 79 | 25 0d 13 1a 1a 20 20 20 |ne_entry|%.... |
|00003720| 20 20 20 20 20 67 65 74 | 24 3d a4 67 65 74 5f 6c | get|$=.get_l|
|00003730| 69 6e 65 0d 13 24 20 20 | 20 20 20 20 20 20 20 e7 |ine..$ | .|
|00003740| 20 67 65 74 24 3c 3e 22 | 53 68 6f 77 20 79 3d 6b | get$<>"|Show y=k|
|00003750| 22 20 8c 0d 13 2e 3c 20 | 20 20 20 20 20 20 20 20 |" ....< | |
|00003760| 20 6d 61 69 6e 5f 6d 65 | 6e 75 5f 69 74 65 6d 73 | main_me|nu_items|
|00003770| 24 28 63 6c 65 61 72 5f | 65 6e 74 72 79 25 2b 31 |$(clear_|entry%+1|
|00003780| 29 3d 22 43 6c 65 61 72 | 20 6c 69 6e 65 73 22 0d |)="Clear| lines".|
|00003790| 13 38 24 20 20 20 20 20 | 20 20 20 20 20 e7 20 79 |.8$ | . y|
|000037a0| 6c 69 6e 65 73 25 3c 6d | 61 78 5f 6c 69 6e 65 73 |lines%<m|ax_lines|
|000037b0| 25 20 8c 0d 13 42 1a 20 | 20 20 20 20 20 20 20 20 |% ...B. | |
|000037c0| 20 20 20 79 6c 69 6e 65 | 73 25 2b 3d 31 0d 13 4c | yline|s%+=1..L|
|000037d0| 25 20 20 20 20 20 20 20 | 20 20 20 20 20 79 24 28 |% | y$(|
|000037e0| 79 6c 69 6e 65 73 25 29 | 3d a4 67 65 74 5f 6c 69 |ylines%)|=.get_li|
|000037f0| 6e 65 0d 13 56 2c 20 20 | 20 20 20 20 20 20 20 20 |ne..V, | |
|00003800| 20 20 79 3d 6f 72 69 79 | 2b a0 28 79 24 28 79 6c | y=oriy|+.(y$(yl|
|00003810| 69 6e 65 73 25 29 29 2a | 79 73 63 61 6c 65 0d 13 |ines%))*|yscale..|
|00003820| 60 6b 20 20 20 20 20 20 | 20 20 20 20 20 20 c8 99 |`k | ..|
|00003830| 20 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 | "Wimp_F|orceRedr|
|00003840| 61 77 22 2c 67 72 61 70 | 68 5f 68 61 6e 64 6c 65 |aw",grap|h_handle|
|00003850| 25 2c 30 2c 2d 77 69 6e | 64 6f 77 5f 68 65 69 67 |%,0,-win|dow_heig|
|00003860| 68 74 25 2b 79 2d 34 30 | 2c 77 69 6e 64 6f 77 5f |ht%+y-40|,window_|
|00003870| 77 69 64 74 68 25 2c 79 | 2d 77 69 6e 64 6f 77 5f |width%,y|-window_|
|00003880| 68 65 69 67 68 74 25 2b | 34 0d 13 6a 53 20 20 20 |height%+|4..jS |
|00003890| 20 20 20 20 20 20 20 20 | 20 e7 20 79 6c 69 6e 65 | | . yline|
|000038a0| 73 25 3d 6d 61 78 5f 6c | 69 6e 65 73 25 20 8c 20 |s%=max_l|ines% . |
|000038b0| 6d 61 69 6e 5f 6d 65 6e | 75 5f 69 74 65 6d 73 24 |main_men|u_items$|
|000038c0| 28 79 6c 69 6e 65 5f 65 | 6e 74 72 79 25 2b 31 29 |(yline_e|ntry%+1)|
|000038d0| 3d 22 7e 53 68 6f 77 20 | 79 3d 6b 22 0d 13 74 0f |="~Show |y=k"..t.|
|000038e0| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 13 7e 0d 20 | | ...~. |
|000038f0| 20 20 20 20 20 20 20 cd | 0d 13 88 04 0d 13 92 17 | .|........|
|00003900| 20 20 20 20 20 20 c9 20 | 64 6f 74 73 5f 65 6e 74 | . |dots_ent|
|00003910| 72 79 25 0d 13 9c 18 20 | 20 20 20 20 20 20 20 64 |ry%.... | d|
|00003920| 6f 74 73 25 3d ac 64 6f | 74 73 25 0d 13 a6 5d 20 |ots%=.do|ts%...] |
|00003930| 20 20 20 20 20 20 20 e7 | 20 64 6f 74 73 25 20 8c | .| dots% .|
|00003940| 20 6d 61 69 6e 5f 6d 65 | 6e 75 5f 66 6c 61 67 73 | main_me|nu_flags|
|00003950| 25 28 64 6f 74 73 5f 65 | 6e 74 72 79 25 2b 31 29 |%(dots_e|ntry%+1)|
|00003960| 2b 3d 31 20 8b 20 6d 61 | 69 6e 5f 6d 65 6e 75 5f |+=1 . ma|in_menu_|
|00003970| 66 6c 61 67 73 25 28 64 | 6f 74 73 5f 65 6e 74 72 |flags%(d|ots_entr|
|00003980| 79 25 2b 31 29 2d 3d 31 | 0d 13 b0 1f 20 20 20 20 |y%+1)-=1|.... |
|00003990| 20 20 20 20 f2 66 6f 72 | 63 65 5f 72 65 64 72 61 | .for|ce_redra|
|000039a0| 77 5f 67 72 61 70 68 0d | 13 ba 04 0d 13 c4 18 20 |w_graph.|....... |
|000039b0| 20 20 20 20 20 c9 20 63 | 6c 65 61 72 5f 65 6e 74 | . c|lear_ent|
|000039c0| 72 79 25 0d 13 ce 27 20 | 20 20 20 20 20 20 20 e7 |ry%...' | .|
|000039d0| 20 78 6c 69 6e 65 73 25 | 3c 3e 30 20 84 20 79 6c | xlines%|<>0 . yl|
|000039e0| 69 6e 65 73 25 3c 3e 30 | 20 8c 0d 13 d8 17 20 20 |ines%<>0| ..... |
|000039f0| 20 20 20 20 20 20 20 20 | 78 6c 69 6e 65 73 25 3d | |xlines%=|
|00003a00| 30 0d 13 e2 17 20 20 20 | 20 20 20 20 20 20 20 79 |0.... | y|
|00003a10| 6c 69 6e 65 73 25 3d 30 | 0d 13 ec 21 20 20 20 20 |lines%=0|...! |
|00003a20| 20 20 20 20 20 20 f2 66 | 6f 72 63 65 5f 72 65 64 | .f|orce_red|
|00003a30| 72 61 77 5f 67 72 61 70 | 68 0d 13 f6 3d 20 20 20 |raw_grap|h...= |
|00003a40| 20 20 20 20 20 20 20 6d | 61 69 6e 5f 6d 65 6e 75 | m|ain_menu|
|00003a50| 5f 69 74 65 6d 73 24 28 | 63 6c 65 61 72 5f 65 6e |_items$(|clear_en|
|00003a60| 74 72 79 25 2b 31 29 3d | 22 7e 43 6c 65 61 72 20 |try%+1)=|"~Clear |
|00003a70| 6c 69 6e 65 73 22 0d 14 | 00 39 20 20 20 20 20 20 |lines"..|.9 |
|00003a80| 20 20 20 20 6d 61 69 6e | 5f 6d 65 6e 75 5f 69 74 | main|_menu_it|
|00003a90| 65 6d 73 24 28 78 6c 69 | 6e 65 5f 65 6e 74 72 79 |ems$(xli|ne_entry|
|00003aa0| 25 2b 31 29 3d 22 53 68 | 6f 77 20 78 3d 6b 22 0d |%+1)="Sh|ow x=k".|
|00003ab0| 14 0a 39 20 20 20 20 20 | 20 20 20 20 20 6d 61 69 |..9 | mai|
|00003ac0| 6e 5f 6d 65 6e 75 5f 69 | 74 65 6d 73 24 28 79 6c |n_menu_i|tems$(yl|
|00003ad0| 69 6e 65 5f 65 6e 74 72 | 79 25 2b 31 29 3d 22 53 |ine_entr|y%+1)="S|
|00003ae0| 68 6f 77 20 79 3d 6b 22 | 0d 14 14 0d 20 20 20 20 |how y=k"|.... |
|00003af0| 20 20 20 20 cd 0d 14 1e | 04 0d 14 28 19 20 20 20 | ....|...(. |
|00003b00| 20 20 20 c9 20 63 6f 6f | 72 64 73 5f 65 6e 74 72 | . coo|rds_entr|
|00003b10| 79 25 0d 14 32 51 20 20 | 20 20 20 20 20 20 6d 61 |y%..2Q | ma|
|00003b20| 69 6e 5f 6d 65 6e 75 5f | 66 6c 61 67 73 25 28 63 |in_menu_|flags%(c|
|00003b30| 6f 6f 72 64 73 5f 65 6e | 74 72 79 25 2b 31 29 3d |oords_en|try%+1)=|
|00003b40| 31 2d 6d 61 69 6e 5f 6d | 65 6e 75 5f 66 6c 61 67 |1-main_m|enu_flag|
|00003b50| 73 25 28 63 6f 6f 72 64 | 73 5f 65 6e 74 72 79 25 |s%(coord|s_entry%|
|00003b60| 2b 31 29 0d 14 3c 31 20 | 20 20 20 20 20 20 20 e7 |+1)..<1 | .|
|00003b70| 20 6d 61 69 6e 5f 6d 65 | 6e 75 5f 66 6c 61 67 73 | main_me|nu_flags|
|00003b80| 25 28 63 6f 6f 72 64 73 | 5f 65 6e 74 72 79 25 2b |%(coords|_entry%+|
|00003b90| 31 29 20 8c 0d 14 46 33 | 20 20 20 20 20 20 20 20 |1) ...F3| |
|00003ba0| 20 20 f2 6f 70 65 6e 5f | 77 69 6e 64 6f 77 5f 61 | .open_|window_a|
|00003bb0| 73 5f 69 73 28 63 6f 6f | 72 64 73 5f 68 61 6e 64 |s_is(coo|rds_hand|
|00003bc0| 6c 65 25 2c 2d 31 29 0d | 14 50 0d 20 20 20 20 20 |le%,-1).|.P. |
|00003bd0| 20 20 20 cc 0d 14 5a 24 | 20 20 20 20 20 20 20 20 | ...Z$| |
|00003be0| 20 20 62 75 66 66 25 21 | 30 3d 63 6f 6f 72 64 73 | buff%!|0=coords|
|00003bf0| 5f 68 61 6e 64 6c 65 25 | 0d 14 64 2a 20 20 20 20 |_handle%|..d* |
|00003c00| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 | ..| "Wimp_C|
|00003c10| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 75 66 |loseWind|ow",,buf|
|00003c20| 66 25 0d 14 6e 0d 20 20 | 20 20 20 20 20 20 cd 0d |f%..n. | ..|
|00003c30| 14 78 04 0d 14 82 18 20 | 20 20 20 20 20 c9 20 73 |.x..... | . s|
|00003c40| 61 76 65 5f 65 6e 74 72 | 79 25 3a 0d 14 8c 2d 20 |ave_entr|y%:...- |
|00003c50| 20 20 20 20 20 20 20 f2 | 73 61 76 65 28 22 3c 4d | .|save("<M|
|00003c60| 61 74 68 47 72 61 70 68 | 24 44 69 72 3e 2e 44 72 |athGraph|$Dir>.Dr|
|00003c70| 61 77 46 69 6c 65 22 29 | 0d 14 96 09 20 20 20 20 |awFile")|.... |
|00003c80| cb 0d 14 a0 15 20 20 20 | 20 e7 20 62 75 74 74 6f |..... | . butto|
|00003c90| 6e 25 3d 31 20 8c 0d 14 | aa 2b 20 20 20 20 20 20 |n%=1 ...|.+ |
|00003ca0| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 43 61 72 65 |.. "Wimp|_GetCare|
|00003cb0| 74 50 6f 73 69 74 69 6f | 6e 22 2c 2c 62 75 66 66 |tPositio|n",,buff|
|00003cc0| 25 0d 14 b4 af 20 20 20 | 20 20 20 6d 61 69 6e 5f |%.... | main_|
|00003cd0| 6d 65 6e 75 5f 68 61 6e | 64 6c 65 25 3d a4 6d 65 |menu_han|dle%=.me|
|00003ce0| 6e 75 28 6d 61 69 6e 5f | 6d 65 6e 75 5f 62 6c 6f |nu(main_|menu_blo|
|00003cf0| 63 6b 25 2c 41 70 70 4e | 61 6d 65 24 2c 6d 61 69 |ck%,AppN|ame$,mai|
|00003d00| 6e 5f 6d 65 6e 75 5f 69 | 74 65 6d 73 24 28 29 2c |n_menu_i|tems$(),|
|00003d10| 6d 61 69 6e 5f 6d 65 6e | 75 5f 66 6c 61 67 73 25 |main_men|u_flags%|
|00003d20| 28 29 2c 6d 61 69 6e 5f | 6d 65 6e 75 5f 73 75 62 |(),main_|menu_sub|
|00003d30| 73 25 28 29 2c 70 6f 6c | 6c 5f 62 75 66 66 25 21 |s%(),pol|l_buff%!|
|00003d40| 30 2d 36 34 2c 70 6f 6c | 6c 5f 62 75 66 66 25 21 |0-64,pol|l_buff%!|
|00003d50| 34 2c a3 2c 30 2c 30 2c | 30 2c b9 29 3a 6d 65 6e |4,.,0,0,|0,.):men|
|00003d60| 75 5f 6f 6e 25 3d 6d 61 | 69 6e 5f 6d 65 6e 75 25 |u_on%=ma|in_menu%|
|00003d70| 0d 14 be 57 20 20 20 20 | 20 20 c8 99 20 22 57 69 |...W | .. "Wi|
|00003d80| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00003d90| 69 6f 6e 22 2c 62 75 66 | 66 25 21 30 2c 62 75 66 |ion",buf|f%!0,buf|
|00003da0| 66 25 21 34 2c 62 75 66 | 66 25 21 38 2c 62 75 66 |f%!4,buf|f%!8,buf|
|00003db0| 66 25 21 31 32 2c 62 75 | 66 66 25 21 31 36 2c 62 |f%!12,bu|ff%!16,b|
|00003dc0| 75 66 66 25 21 32 30 0d | 14 c8 09 20 20 20 20 cd |uff%!20.|... .|
|00003dd0| 0d 14 d2 05 cb 0d 14 dc | 05 e1 0d 14 e6 05 3a 0d |........|......:.|
|00003de0| 14 f0 12 dd 20 f2 6b 65 | 79 5f 70 72 65 73 73 65 |.... .ke|y_presse|
|00003df0| 64 0d 14 fa 15 c8 8e 20 | 70 6f 6c 6c 5f 62 75 66 |d...... |poll_buf|
|00003e00| 66 25 21 30 20 ca 0d 15 | 04 18 20 20 c9 20 64 69 |f%!0 ...|.. . di|
|00003e10| 61 6c 6f 67 75 65 5f 68 | 61 6e 64 6c 65 25 0d 15 |alogue_h|andle%..|
|00003e20| 0e 29 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 47 |.) ..| "Wimp_G|
|00003e30| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00003e40| 2c 2c 62 75 66 66 25 0d | 15 18 15 20 20 20 20 69 |,,buff%.|... i|
|00003e50| 63 6f 6e 25 3d 62 75 66 | 66 25 21 34 0d 15 22 1a |con%=buf|f%!4..".|
|00003e60| 20 20 20 20 c8 8e 20 70 | 6f 6c 6c 5f 62 75 66 66 | .. p|oll_buff|
|00003e70| 25 21 32 34 20 ca 0d 15 | 2c 0f 20 20 20 20 20 20 |%!24 ...|,. |
|00003e80| c9 20 31 33 3a 0d 15 36 | 17 20 20 20 20 20 20 20 |. 13:..6|. |
|00003e90| 20 e7 20 69 63 6f 6e 25 | 3d 35 20 8c 0d 15 40 36 | . icon%|=5 ...@6|
|00003ea0| 20 20 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 | |.. "Wimp|
|00003eb0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 2d 31 |_CreateM|enu",,-1|
|00003ec0| 3a 62 75 74 74 6f 6e 25 | 3d 30 3a f2 6f 6b 61 79 |:button%|=0:.okay|
|00003ed0| 3a e1 0d 15 4a 0d 20 20 | 20 20 20 20 20 20 cd 0d |:...J. | ..|
|00003ee0| 15 54 14 20 20 20 20 20 | 20 20 20 69 63 6f 6e 25 |.T. | icon%|
|00003ef0| 2b 3d 31 0d 15 5e 19 20 | 20 20 20 20 20 c9 20 26 |+=1..^. | . &|
|00003f00| 31 38 45 3a 69 63 6f 6e | 25 2b 3d 31 0d 15 68 19 |18E:icon|%+=1..h.|
|00003f10| 20 20 20 20 20 20 c9 20 | 26 31 38 46 3a 69 63 6f | . |&18F:ico|
|00003f20| 6e 25 2d 3d 31 0d 15 72 | 2e 20 20 20 20 20 20 7f |n%-=1..r|. .|
|00003f30| 20 c8 99 20 22 57 69 6d | 70 5f 50 72 6f 63 65 73 | .. "Wim|p_Proces|
|00003f40| 73 4b 65 79 22 2c 70 6f | 6c 6c 5f 62 75 66 66 25 |sKey",po|ll_buff%|
|00003f50| 21 32 34 0d 15 7c 09 20 | 20 20 20 cb 0d 15 86 1b |!24..|. | .....|
|00003f60| 20 20 20 20 e7 20 69 63 | 6f 6e 25 3c 31 20 8c 20 | . ic|on%<1 . |
|00003f70| 69 63 6f 6e 25 3d 35 0d | 15 90 1b 20 20 20 20 e7 |icon%=5.|... .|
|00003f80| 20 69 63 6f 6e 25 3e 35 | 20 8c 20 69 63 6f 6e 25 | icon%>5| . icon%|
|00003f90| 3d 31 0d 15 9a 1f 20 20 | 20 20 21 62 75 66 66 25 |=1.... | !buff%|
|00003fa0| 3d 64 69 61 6c 6f 67 75 | 65 5f 68 61 6e 64 6c 65 |=dialogu|e_handle|
|00003fb0| 25 0d 15 a4 15 20 20 20 | 20 62 75 66 66 25 21 34 |%.... | buff%!4|
|00003fc0| 3d 69 63 6f 6e 25 0d 15 | ae 25 20 20 20 20 c8 99 |=icon%..|.% ..|
|00003fd0| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00003fe0| 61 74 65 22 2c 2c 62 75 | 66 66 25 0d 15 b8 19 20 |ate",,bu|ff%.... |
|00003ff0| 20 20 20 70 74 72 25 3d | 62 75 66 66 25 21 28 38 | ptr%=|buff%!(8|
|00004000| 2b 32 30 29 0d 15 c2 18 | 20 20 20 20 69 63 6f 6e |+20)....| icon|
|00004010| 5f 74 65 78 74 24 3d 24 | 70 74 72 25 0d 15 cc 4c |_text$=$|ptr%...L|
|00004020| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 | .. "|Wimp_Set|
|00004030| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 64 |CaretPos|ition",d|
|00004040| 69 61 6c 6f 67 75 65 5f | 68 61 6e 64 6c 65 25 2c |ialogue_|handle%,|
|00004050| 69 63 6f 6e 25 2c 2c 2c | 2d 31 2c a9 28 69 63 6f |icon%,,,|-1,.(ico|
|00004060| 6e 5f 74 65 78 74 24 29 | 0d 15 d6 17 20 20 20 20 |n_text$)|.... |
|00004070| c9 20 73 61 76 65 5f 68 | 61 6e 64 6c 65 25 3a 0d |. save_h|andle%:.|
|00004080| 15 e0 2e 20 20 20 20 20 | 20 e7 20 64 61 74 61 25 |... | . data%|
|00004090| 21 30 3d 73 61 76 65 5f | 68 61 6e 64 6c 65 25 20 |!0=save_|handle% |
|000040a0| 80 20 64 61 74 61 25 21 | 34 3d 31 20 8c 0d 15 ea |. data%!|4=1 ....|
|000040b0| 26 20 20 20 20 20 20 20 | 20 e7 20 64 61 74 61 25 |& | . data%|
|000040c0| 21 32 34 3d 31 33 20 8c | 20 f2 6f 6b 61 79 5f 73 |!24=13 .| .okay_s|
|000040d0| 61 76 65 0d 15 f4 29 20 | 20 20 20 20 20 cc 20 c8 |ave...) | . .|
|000040e0| 99 20 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |. "Wimp_|ProcessK|
|000040f0| 65 79 22 2c 64 61 74 61 | 25 21 32 34 0d 15 fe 0b |ey",data|%!24....|
|00004100| 20 20 20 20 20 20 cd 0d | 16 08 2c 20 20 20 20 7f | ..|.., .|
|00004110| 20 c8 99 20 22 57 69 6d | 70 5f 50 72 6f 63 65 73 | .. "Wim|p_Proces|
|00004120| 73 4b 65 79 22 2c 70 6f | 6c 6c 5f 62 75 66 66 25 |sKey",po|ll_buff%|
|00004130| 21 32 34 0d 16 12 05 cb | 0d 16 1c 05 e1 0d 16 26 |!24.....|.......&|
|00004140| 05 3a 0d 16 30 0b dd 20 | f2 6f 6b 61 79 0d 16 3a |.:..0.. |.okay..:|
|00004150| 30 ea 20 64 75 6d 6d 79 | 24 2c 64 75 6d 6d 79 68 |0. dummy|$,dummyh|
|00004160| 24 2c 64 75 6d 6d 79 6c | 24 2c 64 75 6d 6d 79 2c |$,dummyl|$,dummy,|
|00004170| 64 75 6d 6d 79 6c 2c 64 | 75 6d 6d 79 68 0d 16 44 |dummyl,d|ummyh..D|
|00004180| 28 64 75 6d 6d 79 24 3d | a4 67 65 74 5f 74 65 78 |(dummy$=|.get_tex|
|00004190| 74 28 64 69 61 6c 6f 67 | 75 65 5f 68 61 6e 64 6c |t(dialog|ue_handl|
|000041a0| 65 25 2c 31 29 0d 16 4e | 34 e7 20 a4 63 61 70 73 |e%,1)..N|4. .caps|
|000041b0| 28 64 75 6d 6d 79 24 29 | 3c 3e a4 63 61 70 73 28 |(dummy$)|<>.caps(|
|000041c0| 45 24 29 20 8c 20 45 24 | 3d 64 75 6d 6d 79 24 3a |E$) . E$|=dummy$:|
|000041d0| 63 61 63 68 65 64 25 3d | a3 0d 16 58 29 64 75 6d |cached%=|...X)dum|
|000041e0| 6d 79 6c 24 3d a4 67 65 | 74 5f 74 65 78 74 28 64 |myl$=.ge|t_text(d|
|000041f0| 69 61 6c 6f 67 75 65 5f | 68 61 6e 64 6c 65 25 2c |ialogue_|handle%,|
|00004200| 32 29 0d 16 62 1c 64 75 | 6d 6d 79 6c 3d a0 28 a4 |2)..b.du|mmyl=.(.|
|00004210| 63 61 70 73 28 64 75 6d | 6d 79 6c 24 29 29 0d 16 |caps(dum|myl$))..|
|00004220| 6c 29 64 75 6d 6d 79 68 | 24 3d a4 67 65 74 5f 74 |l)dummyh|$=.get_t|
|00004230| 65 78 74 28 64 69 61 6c | 6f 67 75 65 5f 68 61 6e |ext(dial|ogue_han|
|00004240| 64 6c 65 25 2c 33 29 0d | 16 76 1c 64 75 6d 6d 79 |dle%,3).|.v.dummy|
|00004250| 68 3d a0 28 a4 63 61 70 | 73 28 64 75 6d 6d 79 68 |h=.(.cap|s(dummyh|
|00004260| 24 29 29 0d 16 80 39 e7 | 20 64 75 6d 6d 79 6c 3e |$))...9.| dummyl>|
|00004270| 64 75 6d 6d 79 68 20 8c | 20 c8 94 20 64 75 6d 6d |dummyh .| .. dumm|
|00004280| 79 68 24 2c 64 75 6d 6d | 79 6c 24 3a c8 94 20 64 |yh$,dumm|yl$:.. d|
|00004290| 75 6d 6d 79 68 2c 64 75 | 6d 6d 79 6c 0d 16 8a 16 |ummyh,du|mmyl....|
|000042a0| e7 20 64 75 6d 6d 79 68 | 3c 3e 64 75 6d 6d 79 6c |. dummyh|<>dummyl|
|000042b0| 20 8c 0d 16 94 2e 20 20 | e7 20 64 75 6d 6d 79 6c | ..... |. dummyl|
|000042c0| 3c 3e a0 28 6c 78 24 29 | 20 8c 20 6c 78 24 3d 64 |<>.(lx$)| . lx$=d|
|000042d0| 75 6d 6d 79 6c 24 3a 63 | 61 63 68 65 64 25 3d a3 |ummyl$:c|ached%=.|
|000042e0| 0d 16 9e 2e 20 20 e7 20 | 64 75 6d 6d 79 68 3c 3e |.... . |dummyh<>|
|000042f0| a0 28 68 78 24 29 20 8c | 20 68 78 24 3d 64 75 6d |.(hx$) .| hx$=dum|
|00004300| 6d 79 68 24 3a 63 61 63 | 68 65 64 25 3d a3 0d 16 |myh$:cac|hed%=...|
|00004310| a8 05 cd 0d 16 b2 29 64 | 75 6d 6d 79 6c 24 3d a4 |......)d|ummyl$=.|
|00004320| 67 65 74 5f 74 65 78 74 | 28 64 69 61 6c 6f 67 75 |get_text|(dialogu|
|00004330| 65 5f 68 61 6e 64 6c 65 | 25 2c 34 29 0d 16 bc 1c |e_handle|%,4)....|
|00004340| 64 75 6d 6d 79 6c 3d a0 | 28 a4 63 61 70 73 28 64 |dummyl=.|(.caps(d|
|00004350| 75 6d 6d 79 6c 24 29 29 | 0d 16 c6 29 64 75 6d 6d |ummyl$))|...)dumm|
|00004360| 79 68 24 3d a4 67 65 74 | 5f 74 65 78 74 28 64 69 |yh$=.get|_text(di|
|00004370| 61 6c 6f 67 75 65 5f 68 | 61 6e 64 6c 65 25 2c 35 |alogue_h|andle%,5|
|00004380| 29 0d 16 d0 1c 64 75 6d | 6d 79 68 3d a0 28 a4 63 |)....dum|myh=.(.c|
|00004390| 61 70 73 28 64 75 6d 6d | 79 68 24 29 29 0d 16 da |aps(dumm|yh$))...|
|000043a0| 39 e7 20 64 75 6d 6d 79 | 6c 3e 64 75 6d 6d 79 68 |9. dummy|l>dummyh|
|000043b0| 20 8c 20 c8 94 20 64 75 | 6d 6d 79 68 24 2c 64 75 | . .. du|mmyh$,du|
|000043c0| 6d 6d 79 6c 24 3a c8 94 | 20 64 75 6d 6d 79 68 2c |mmyl$:..| dummyh,|
|000043d0| 64 75 6d 6d 79 6c 0d 16 | e4 16 e7 20 64 75 6d 6d |dummyl..|... dumm|
|000043e0| 79 68 3c 3e 64 75 6d 6d | 79 6c 20 8c 0d 16 ee 2e |yh<>dumm|yl .....|
|000043f0| 20 20 e7 20 64 75 6d 6d | 79 6c 3c 3e a0 28 6c 79 | . dumm|yl<>.(ly|
|00004400| 24 29 20 8c 20 6c 79 24 | 3d 64 75 6d 6d 79 6c 24 |$) . ly$|=dummyl$|
|00004410| 3a 63 61 63 68 65 64 25 | 3d a3 0d 16 f8 2e 20 20 |:cached%|=..... |
|00004420| e7 20 64 75 6d 6d 79 68 | 3c 3e a0 28 68 79 24 29 |. dummyh|<>.(hy$)|
|00004430| 20 8c 20 68 79 24 3d 64 | 75 6d 6d 79 68 24 3a 63 | . hy$=d|ummyh$:c|
|00004440| 61 63 68 65 64 25 3d a3 | 0d 17 02 05 cd 0d 17 0c |ached%=.|........|
|00004450| 13 7a 6f 6f 6d 5f 63 6f | 75 6e 74 65 72 25 3d 31 |.zoom_co|unter%=1|
|00004460| 0d 17 16 30 6d 61 69 6e | 5f 6d 65 6e 75 5f 69 74 |...0main|_menu_it|
|00004470| 65 6d 73 24 28 75 6e 64 | 6f 5f 65 6e 74 72 79 25 |ems$(und|o_entry%|
|00004480| 2b 31 29 3d 22 7e 55 6e | 64 6f 20 7a 6f 6f 6d 22 |+1)="~Un|do zoom"|
|00004490| 0d 17 20 bd e7 20 62 75 | 74 74 6f 6e 25 3d 61 64 |.. .. bu|tton%=ad|
|000044a0| 6a 75 73 74 25 20 8c 20 | 6d 61 69 6e 5f 6d 65 6e |just% . |main_men|
|000044b0| 75 5f 68 61 6e 64 6c 65 | 25 3d a4 6d 65 6e 75 28 |u_handle|%=.menu(|
|000044c0| 6d 61 69 6e 5f 6d 65 6e | 75 5f 62 6c 6f 63 6b 25 |main_men|u_block%|
|000044d0| 2c 41 70 70 4e 61 6d 65 | 24 2c 6d 61 69 6e 5f 6d |,AppName|$,main_m|
|000044e0| 65 6e 75 5f 69 74 65 6d | 73 24 28 29 2c 6d 61 69 |enu_item|s$(),mai|
|000044f0| 6e 5f 6d 65 6e 75 5f 66 | 6c 61 67 73 25 28 29 2c |n_menu_f|lags%(),|
|00004500| 6d 61 69 6e 5f 6d 65 6e | 75 5f 73 75 62 73 25 28 |main_men|u_subs%(|
|00004510| 29 2c 70 6f 6c 6c 5f 62 | 75 66 66 25 21 30 2d 36 |),poll_b|uff%!0-6|
|00004520| 34 2c 70 6f 6c 6c 5f 62 | 75 66 66 25 21 34 2c a3 |4,poll_b|uff%!4,.|
|00004530| 2c 30 2c 30 2c 30 2c b9 | 29 3a 6d 65 6e 75 5f 6f |,0,0,0,.|):menu_o|
|00004540| 6e 25 3d 6d 61 69 6e 5f | 6d 65 6e 75 25 0d 17 2a |n%=main_|menu%..*|
|00004550| 11 e7 20 63 61 63 68 65 | 64 25 3d a3 20 8c 0d 17 |.. cache|d%=. ...|
|00004560| 34 1a 20 20 f4 78 6c 69 | 6e 65 73 25 3d 30 3a 79 |4. .xli|nes%=0:y|
|00004570| 6c 69 6e 65 73 25 3d 30 | 0d 17 3e 1c 20 20 f2 72 |lines%=0|..>. .r|
|00004580| 65 64 72 61 77 28 67 72 | 61 70 68 5f 68 61 6e 64 |edraw(gr|aph_hand|
|00004590| 6c 65 25 29 0d 17 48 05 | cc 0d 17 52 10 20 20 f4 |le%)..H.|...R. .|
|000045a0| 78 6c 69 6e 65 73 25 3d | 30 0d 17 5c 10 20 20 f4 |xlines%=|0..\. .|
|000045b0| 79 6c 69 6e 65 73 25 3d | 30 0d 17 66 4d 20 20 f4 |ylines%=|0..fM .|
|000045c0| 53 59 53 20 22 57 69 6d | 70 5f 46 6f 72 63 65 52 |SYS "Wim|p_ForceR|
|000045d0| 65 64 72 61 77 22 2c 67 | 72 61 70 68 5f 68 61 6e |edraw",g|raph_han|
|000045e0| 64 6c 65 25 2c 30 2c 2d | 77 69 6e 64 6f 77 5f 68 |dle%,0,-|window_h|
|000045f0| 65 69 67 68 74 25 2c 77 | 69 6e 64 6f 77 5f 77 69 |eight%,w|indow_wi|
|00004600| 64 74 68 25 2c 30 0d 17 | 70 05 cd 0d 17 7a 05 e1 |dth%,0..|p....z..|
|00004610| 0d 17 84 05 3a 0d 17 8e | 22 dd 20 a4 67 65 74 5f |....:...|". .get_|
|00004620| 74 65 78 74 28 77 69 6e | 64 6f 77 5f 68 61 6e 64 |text(win|dow_hand|
|00004630| 6c 65 25 2c 69 25 29 0d | 17 98 1c ea 20 70 74 72 |le%,i%).|.... ptr|
|00004640| 25 2c 69 63 6f 6e 5f 74 | 65 78 74 24 2c 64 75 6d |%,icon_t|ext$,dum|
|00004650| 6d 79 25 0d 17 a2 1d 21 | 67 65 74 5f 62 75 66 66 |my%....!|get_buff|
|00004660| 25 3d 77 69 6e 64 6f 77 | 5f 68 61 6e 64 6c 65 25 |%=window|_handle%|
|00004670| 0d 17 ac 12 67 65 74 5f | 62 75 66 66 25 21 34 3d |....get_|buff%!4=|
|00004680| 69 25 0d 17 b6 25 c8 99 | 20 22 57 69 6d 70 5f 47 |i%...%..| "Wimp_G|
|00004690| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 67 65 |etIconSt|ate",,ge|
|000046a0| 74 5f 62 75 66 66 25 0d | 17 c0 19 70 74 72 25 3d |t_buff%.|...ptr%=|
|000046b0| 67 65 74 5f 62 75 66 66 | 25 21 28 38 2b 32 30 29 |get_buff|%!(8+20)|
|000046c0| 0d 17 ca 14 69 63 6f 6e | 5f 74 65 78 74 24 3d 24 |....icon|_text$=$|
|000046d0| 70 74 72 25 0d 17 d4 15 | e7 20 69 63 6f 6e 5f 74 |ptr%....|. icon_t|
|000046e0| 65 78 74 24 3d 22 22 20 | 8c 0d 17 de 14 20 20 69 |ext$="" |..... i|
|000046f0| 63 6f 6e 5f 74 65 78 74 | 24 3d 22 30 22 0d 17 e8 |con_text|$="0"...|
|00004700| 23 20 20 64 75 6d 6d 79 | 25 3d a4 70 75 74 5f 69 |# dummy|%=.put_i|
|00004710| 63 6f 6e 5f 74 65 78 74 | 28 69 25 2c 22 30 22 29 |con_text|(i%,"0")|
|00004720| 0d 17 f2 05 cd 0d 17 fc | 0f 3d 69 63 6f 6e 5f 74 |........|.=icon_t|
|00004730| 65 78 74 24 0d 18 06 05 | 3a 0d 18 10 17 dd 20 f2 |ext$....|:..... .|
|00004740| 72 65 73 74 6f 72 65 28 | 72 65 64 72 61 77 25 29 |restore(|redraw%)|
|00004750| 0d 18 1a 20 ea 20 64 75 | 6d 6d 79 24 2c 64 75 6d |... . du|mmy$,dum|
|00004760| 6d 79 2c 70 74 72 25 2c | 63 68 61 6e 67 65 64 25 |my,ptr%,|changed%|
|00004770| 0d 18 24 1b 21 62 75 66 | 66 25 3d 64 69 61 6c 6f |..$.!buf|f%=dialo|
|00004780| 67 75 65 5f 68 61 6e 64 | 6c 65 25 0d 18 2e 0e 63 |gue_hand|le%....c|
|00004790| 68 61 6e 67 65 64 25 3d | a3 0d 18 38 27 e7 20 a4 |hanged%=|...8'. .|
|000047a0| 70 75 74 5f 69 63 6f 6e | 5f 74 65 78 74 28 31 2c |put_icon|_text(1,|
|000047b0| 45 24 29 20 8c 20 63 68 | 61 6e 67 65 64 25 3d b9 |E$) . ch|anged%=.|
|000047c0| 0d 18 42 28 e7 20 a4 70 | 75 74 5f 69 63 6f 6e 5f |..B(. .p|ut_icon_|
|000047d0| 74 65 78 74 28 32 2c 6c | 78 24 29 20 8c 20 63 68 |text(2,l|x$) . ch|
|000047e0| 61 6e 67 65 64 25 3d b9 | 0d 18 4c 28 e7 20 a4 70 |anged%=.|..L(. .p|
|000047f0| 75 74 5f 69 63 6f 6e 5f | 74 65 78 74 28 33 2c 68 |ut_icon_|text(3,h|
|00004800| 78 24 29 20 8c 20 63 68 | 61 6e 67 65 64 25 3d b9 |x$) . ch|anged%=.|
|00004810| 0d 18 56 28 e7 20 a4 70 | 75 74 5f 69 63 6f 6e 5f |..V(. .p|ut_icon_|
|00004820| 74 65 78 74 28 34 2c 6c | 79 24 29 20 8c 20 63 68 |text(4,l|y$) . ch|
|00004830| 61 6e 67 65 64 25 3d b9 | 0d 18 60 28 e7 20 a4 70 |anged%=.|..`(. .p|
|00004840| 75 74 5f 69 63 6f 6e 5f | 74 65 78 74 28 35 2c 68 |ut_icon_|text(5,h|
|00004850| 79 24 29 20 8c 20 63 68 | 61 6e 67 65 64 25 3d b9 |y$) . ch|anged%=.|
|00004860| 0d 18 6a 23 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..j#.. "|Wimp_Get|
|00004870| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 62 75 |PointerI|nfo",,bu|
|00004880| 66 66 25 0d 18 74 1d e7 | 20 62 75 66 66 25 21 38 |ff%..t..| buff%!8|
|00004890| 3d 31 20 80 20 72 65 64 | 72 61 77 25 3d b9 20 8c |=1 . red|raw%=. .|
|000048a0| 0d 18 7e b8 20 20 e7 20 | 63 68 61 6e 67 65 64 25 |..~. . |changed%|
|000048b0| 20 8c 20 6d 61 69 6e 5f | 6d 65 6e 75 5f 68 61 6e | . main_|menu_han|
|000048c0| 64 6c 65 25 3d a4 6d 65 | 6e 75 28 6d 61 69 6e 5f |dle%=.me|nu(main_|
|000048d0| 6d 65 6e 75 5f 62 6c 6f | 63 6b 25 2c 41 70 70 4e |menu_blo|ck%,AppN|
|000048e0| 61 6d 65 24 2c 6d 61 69 | 6e 5f 6d 65 6e 75 5f 69 |ame$,mai|n_menu_i|
|000048f0| 74 65 6d 73 24 28 29 2c | 6d 61 69 6e 5f 6d 65 6e |tems$(),|main_men|
|00004900| 75 5f 66 6c 61 67 73 25 | 28 29 2c 6d 61 69 6e 5f |u_flags%|(),main_|
|00004910| 6d 65 6e 75 5f 73 75 62 | 73 25 28 29 2c 70 6f 6c |menu_sub|s%(),pol|
|00004920| 6c 5f 62 75 66 66 25 21 | 30 2d 36 34 2c 70 6f 6c |l_buff%!|0-64,pol|
|00004930| 6c 5f 62 75 66 66 25 21 | 34 2c a3 2c 30 2c 30 2c |l_buff%!|4,.,0,0,|
|00004940| 30 2c b9 29 3a 6d 65 6e | 75 5f 6f 6e 25 3d 6d 61 |0,.):men|u_on%=ma|
|00004950| 69 6e 5f 6d 65 6e 75 25 | 0d 18 88 1f 20 20 cc 20 |in_menu%|.... . |
|00004960| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |.."Wimp_|CreateMe|
|00004970| 6e 75 22 2c 2c 2d 31 0d | 18 92 05 cd 0d 18 9c 0e |nu",,-1.|........|
|00004980| 63 68 61 6e 67 65 64 25 | 3d a3 0d 18 a6 05 e1 0d |changed%|=.......|
|00004990| 18 b0 05 3a 0d 18 ba 23 | dd 20 a4 70 75 74 5f 69 |...:...#|. .put_i|
|000049a0| 63 6f 6e 5f 74 65 78 74 | 28 69 63 6f 6e 25 2c 73 |con_text|(icon%,s|
|000049b0| 74 72 69 6e 67 24 29 0d | 18 c4 13 ea 20 70 74 72 |tring$).|.... ptr|
|000049c0| 25 2c 63 68 61 6e 67 65 | 64 25 0d 18 ce 0e 63 68 |%,change|d%....ch|
|000049d0| 61 6e 67 65 64 25 3d a3 | 0d 18 d8 11 62 75 66 66 |anged%=.|....buff|
|000049e0| 25 21 34 3d 69 63 6f 6e | 25 0d 18 e2 21 c8 99 20 |%!4=icon|%...!.. |
|000049f0| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00004a00| 74 65 22 2c 2c 62 75 66 | 66 25 0d 18 ec 1f c8 99 |te",,buf|f%......|
|00004a10| 20 22 57 69 6d 70 5f 44 | 65 6c 65 74 65 49 63 6f | "Wimp_D|eleteIco|
|00004a20| 6e 22 2c 2c 62 75 66 66 | 25 0d 18 f6 15 70 74 72 |n",,buff|%....ptr|
|00004a30| 25 3d 62 75 66 66 25 21 | 28 38 2b 32 30 29 0d 19 |%=buff%!|(8+20)..|
|00004a40| 00 15 6f 72 69 67 69 6e | 61 6c 24 3d 24 28 70 74 |..origin|al$=$(pt|
|00004a50| 72 25 29 0d 19 0a 13 24 | 28 70 74 72 25 29 3d 73 |r%)....$|(ptr%)=s|
|00004a60| 74 72 69 6e 67 24 0d 19 | 14 25 e7 20 6f 72 69 67 |tring$..|.%. orig|
|00004a70| 69 6e 61 6c 24 3c 3e 73 | 74 72 69 6e 67 24 20 8c |inal$<>s|tring$ .|
|00004a80| 20 63 68 61 6e 67 65 64 | 25 3d b9 0d 19 1e 14 f2 | changed|%=......|
|00004a90| 6d 6f 76 65 5f 69 63 6f | 6e 5f 62 6c 6f 63 6b 0d |move_ico|n_block.|
|00004aa0| 19 28 1f c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |.(... "W|imp_Crea|
|00004ab0| 74 65 49 63 6f 6e 22 2c | 2c 62 75 66 66 25 0d 19 |teIcon",|,buff%..|
|00004ac0| 32 1c 62 75 66 66 25 21 | 30 3d 64 69 61 6c 6f 67 |2.buff%!|0=dialog|
|00004ad0| 75 65 5f 68 61 6e 64 6c | 65 25 0d 19 3c 11 62 75 |ue_handl|e%..<.bu|
|00004ae0| 66 66 25 21 34 3d 69 63 | 6f 6e 25 0d 19 46 0d 62 |ff%!4=ic|on%..F.b|
|00004af0| 75 66 66 25 21 38 3d 30 | 0d 19 50 0e 62 75 66 66 |uff%!8=0|..P.buff|
|00004b00| 25 21 31 32 3d 30 0d 19 | 5a 0d 3d 63 68 61 6e 67 |%!12=0..|Z.=chang|
|00004b10| 65 64 25 0d 19 64 05 3a | 0d 19 6e 16 dd 20 f2 6d |ed%..d.:|..n.. .m|
|00004b20| 6f 76 65 5f 69 63 6f 6e | 5f 62 6c 6f 63 6b 0d 19 |ove_icon|_block..|
|00004b30| 78 08 ea 20 43 25 0d 19 | 82 13 e3 20 43 25 3d 34 |x.. C%..|... C%=4|
|00004b40| 20 b8 20 33 32 20 88 20 | 34 0d 19 8c 1b 62 75 66 | . 32 . |4....buf|
|00004b50| 66 25 21 28 43 25 29 3d | 62 75 66 66 25 21 28 43 |f%!(C%)=|buff%!(C|
|00004b60| 25 2b 34 29 0d 19 96 05 | ed 0d 19 a0 05 e1 0d 19 |%+4)....|........|
|00004b70| aa 05 3a 0d 19 b4 0f dd | 20 f2 64 72 61 67 5f 62 |..:.....| .drag_b|
|00004b80| 6f 78 0d 19 be 27 ea 20 | 78 2c 79 2c 64 75 6d 6d |ox...'. |x,y,dumm|
|00004b90| 79 2c 76 61 78 30 25 2c | 76 61 78 31 25 2c 76 61 |y,vax0%,|vax1%,va|
|00004ba0| 79 30 25 2c 76 61 79 31 | 25 0d 19 c8 22 c8 99 22 |y0%,vay1|%...".."|
|00004bb0| 57 69 6d 70 5f 47 65 74 | 50 6f 69 6e 74 65 72 49 |Wimp_Get|PointerI|
|00004bc0| 6e 66 6f 22 2c 2c 62 75 | 66 66 25 0d 19 d2 0d 78 |nfo",,bu|ff%....x|
|00004bd0| 3d 62 75 66 66 25 21 30 | 0d 19 dc 0d 79 3d 62 75 |=buff%!0|....y=bu|
|00004be0| 66 66 25 21 34 0d 19 e6 | 21 e7 20 7a 6f 6f 6d 5f |ff%!4...|!. zoom_|
|00004bf0| 63 6f 75 6e 74 65 72 25 | 3c 30 20 8c 20 f2 63 6f |counter%|<0 . .co|
|00004c00| 6f 72 64 5f 6f 6e 0d 19 | f0 19 62 75 66 66 25 21 |ord_on..|..buff%!|
|00004c10| 30 3d 67 72 61 70 68 5f | 68 61 6e 64 6c 65 25 0d |0=graph_|handle%.|
|00004c20| 19 fa 23 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |..#.. "W|imp_GetW|
|00004c30| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 75 66 |indowSta|te",,buf|
|00004c40| 66 25 0d 1a 04 11 76 61 | 78 30 25 3d 62 75 66 66 |f%....va|x0%=buff|
|00004c50| 25 21 34 0d 1a 0e 11 76 | 61 79 30 25 3d 62 75 66 |%!4....v|ay0%=buf|
|00004c60| 66 25 21 38 0d 1a 18 12 | 76 61 78 31 25 3d 62 75 |f%!8....|vax1%=bu|
|00004c70| 66 66 25 21 31 32 0d 1a | 22 12 76 61 79 31 25 3d |ff%!12..|".vay1%=|
|00004c80| 62 75 66 66 25 21 31 36 | 0d 1a 2c 2d e7 20 7a 6f |buff%!16|..,-. zo|
|00004c90| 6f 6d 5f 63 6f 75 6e 74 | 65 72 25 3e 30 20 8c 20 |om_count|er%>0 . |
|00004ca0| 62 75 66 66 25 21 34 3d | 36 20 8b 20 62 75 66 66 |buff%!4=|6 . buff|
|00004cb0| 25 21 34 3d 37 0d 1a 36 | 0d 62 75 66 66 25 21 38 |%!4=7..6|.buff%!8|
|00004cc0| 3d 78 0d 1a 40 0e 62 75 | 66 66 25 21 31 32 3d 79 |=x..@.bu|ff%!12=y|
|00004cd0| 0d 1a 4a 0e 62 75 66 66 | 25 21 31 36 3d 78 0d 1a |..J.buff|%!16=x..|
|00004ce0| 54 0e 62 75 66 66 25 21 | 32 30 3d 79 0d 1a 5e 12 |T.buff%!|20=y..^.|
|00004cf0| 62 75 66 66 25 21 32 34 | 3d 76 61 78 30 25 0d 1a |buff%!24|=vax0%..|
|00004d00| 68 12 62 75 66 66 25 21 | 32 38 3d 76 61 79 30 25 |h.buff%!|28=vay0%|
|00004d10| 0d 1a 72 12 62 75 66 66 | 25 21 33 32 3d 76 61 78 |..r.buff|%!32=vax|
|00004d20| 31 25 0d 1a 7c 12 62 75 | 66 66 25 21 33 36 3d 76 |1%..|.bu|ff%!36=v|
|00004d30| 61 79 31 25 0d 1a 86 1b | c8 99 22 57 69 6d 70 5f |ay1%....|.."Wimp_|
|00004d40| 44 72 61 67 42 6f 78 22 | 2c 2c 62 75 66 66 25 0d |DragBox"|,,buff%.|
|00004d50| 1a 90 0b 64 72 61 67 25 | 3d 31 0d 1a 9a 05 e1 0d |...drag%|=1......|
|00004d60| 1a a4 05 3a 0d 1a ae 11 | dd 20 f2 63 68 65 63 6b |...:....|. .check|
|00004d70| 5f 64 72 61 67 0d 1a b8 | 22 e7 20 64 72 61 67 25 |_drag...|". drag%|
|00004d80| 3d 32 20 8c 20 f2 63 68 | 65 63 6b 5f 64 72 61 67 |=2 . .ch|eck_drag|
|00004d90| 5f 73 61 76 65 3a e1 0d | 1a c2 17 e7 20 7a 6f 6f |_save:..|.... zoo|
|00004da0| 6d 5f 63 6f 75 6e 74 65 | 72 25 3e 30 20 8c 0d 1a |m_counte|r%>0 ...|
|00004db0| cc 1d 20 20 7a 6c 78 24 | 28 7a 6f 6f 6d 5f 63 6f |.. zlx$|(zoom_co|
|00004dc0| 75 6e 74 65 72 25 29 3d | 6c 78 24 0d 1a d6 1d 20 |unter%)=|lx$.... |
|00004dd0| 20 7a 68 78 24 28 7a 6f | 6f 6d 5f 63 6f 75 6e 74 | zhx$(zo|om_count|
|00004de0| 65 72 25 29 3d 68 78 24 | 0d 1a e0 1d 20 20 7a 6c |er%)=hx$|.... zl|
|00004df0| 79 24 28 7a 6f 6f 6d 5f | 63 6f 75 6e 74 65 72 25 |y$(zoom_|counter%|
|00004e00| 29 3d 6c 79 24 0d 1a ea | 1d 20 20 7a 68 79 24 28 |)=ly$...|. zhy$(|
|00004e10| 7a 6f 6f 6d 5f 63 6f 75 | 6e 74 65 72 25 29 3d 68 |zoom_cou|nter%)=h|
|00004e20| 79 24 0d 1a f4 0f 20 20 | 6c 78 3d a0 28 6c 78 24 |y$.... |lx=.(lx$|
|00004e30| 29 0d 1a fe 0f 20 20 68 | 78 3d a0 28 68 78 24 29 |).... h|x=.(hx$)|
|00004e40| 0d 1b 08 0f 20 20 6c 79 | 3d a0 28 6c 79 24 29 0d |.... ly|=.(ly$).|
|00004e50| 1b 12 0f 20 20 68 79 3d | a0 28 68 79 24 29 0d 1b |... hy=|.(hy$)..|
|00004e60| 1c 1b 20 20 62 75 66 66 | 25 21 30 3d 67 72 61 70 |.. buff|%!0=grap|
|00004e70| 68 5f 68 61 6e 64 6c 65 | 25 0d 1b 26 25 20 20 c8 |h_handle|%..&% .|
|00004e80| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00004e90| 77 53 74 61 74 65 22 2c | 2c 62 75 66 66 25 0d 1b |wState",|,buff%..|
|00004ea0| 30 1e 20 20 73 63 6d 69 | 6e 78 25 3d 62 75 66 66 |0. scmi|nx%=buff|
|00004eb0| 25 21 34 2d 62 75 66 66 | 25 21 32 30 0d 1b 3a 26 |%!4-buff|%!20..:&|
|00004ec0| 20 20 76 69 73 69 62 6c | 65 5f 68 65 69 67 68 74 | visibl|e_height|
|00004ed0| 25 3d 62 75 66 66 25 21 | 31 36 2d 62 75 66 66 25 |%=buff%!|16-buff%|
|00004ee0| 21 38 0d 1b 44 3f 20 20 | 73 63 6d 69 6e 79 25 3d |!8..D? |scminy%=|
|00004ef0| 62 75 66 66 25 21 38 2d | 28 77 69 6e 64 6f 77 5f |buff%!8-|(window_|
|00004f00| 68 65 69 67 68 74 25 2d | 76 69 73 69 62 6c 65 5f |height%-|visible_|
|00004f10| 68 65 69 67 68 74 25 29 | 2d 62 75 66 66 25 21 32 |height%)|-buff%!2|
|00004f20| 34 0d 1b 4e 21 20 20 77 | 69 6e 78 30 25 3d 70 6f |4..N! w|inx0%=po|
|00004f30| 6c 6c 5f 62 75 66 66 25 | 21 30 2d 73 63 6d 69 6e |ll_buff%|!0-scmin|
|00004f40| 78 25 0d 1b 58 21 20 20 | 77 69 6e 79 30 25 3d 70 |x%..X! |winy0%=p|
|00004f50| 6f 6c 6c 5f 62 75 66 66 | 25 21 34 2d 73 63 6d 69 |oll_buff|%!4-scmi|
|00004f60| 6e 79 25 0d 1b 62 21 20 | 20 77 69 6e 78 31 25 3d |ny%..b! | winx1%=|
|00004f70| 70 6f 6c 6c 5f 62 75 66 | 66 25 21 38 2d 73 63 6d |poll_buf|f%!8-scm|
|00004f80| 69 6e 78 25 0d 1b 6c 22 | 20 20 77 69 6e 79 31 25 |inx%..l"| winy1%|
|00004f90| 3d 70 6f 6c 6c 5f 62 75 | 66 66 25 21 31 32 2d 73 |=poll_bu|ff%!12-s|
|00004fa0| 63 6d 69 6e 79 25 0d 1b | 76 28 20 20 e7 20 77 69 |cminy%..|v( . wi|
|00004fb0| 6e 78 30 25 3e 77 69 6e | 78 31 25 20 8c 20 c8 94 |nx0%>win|x1% . ..|
|00004fc0| 20 77 69 6e 78 30 25 2c | 77 69 6e 78 31 25 0d 1b | winx0%,|winx1%..|
|00004fd0| 80 28 20 20 e7 20 77 69 | 6e 79 30 25 3e 77 69 6e |.( . wi|ny0%>win|
|00004fe0| 79 31 25 20 8c 20 c8 94 | 20 77 69 6e 79 30 25 2c |y1% . ..| winy0%,|
|00004ff0| 77 69 6e 79 31 25 0d 1b | 8a 2c 20 20 6d 69 6e 78 |winy1%..|., minx|
|00005000| 3d 28 77 69 6e 78 30 25 | 2f 77 69 6e 64 6f 77 5f |=(winx0%|/window_|
|00005010| 77 69 64 74 68 25 29 2a | 28 68 78 2d 6c 78 29 2b |width%)*|(hx-lx)+|
|00005020| 6c 78 0d 1b 94 2d 20 20 | 6d 69 6e 79 3d 28 77 69 |lx...- |miny=(wi|
|00005030| 6e 79 30 25 2f 77 69 6e | 64 6f 77 5f 68 65 69 67 |ny0%/win|dow_heig|
|00005040| 68 74 25 29 2a 28 68 79 | 2d 6c 79 29 2b 6c 79 0d |ht%)*(hy|-ly)+ly.|
|00005050| 1b 9e 2c 20 20 6d 61 78 | 78 3d 28 77 69 6e 78 31 |.., max|x=(winx1|
|00005060| 25 2f 77 69 6e 64 6f 77 | 5f 77 69 64 74 68 25 29 |%/window|_width%)|
|00005070| 2a 28 68 78 2d 6c 78 29 | 2b 6c 78 0d 1b a8 2d 20 |*(hx-lx)|+lx...- |
|00005080| 20 6d 61 78 79 3d 28 77 | 69 6e 79 31 25 2f 77 69 | maxy=(w|iny1%/wi|
|00005090| 6e 64 6f 77 5f 68 65 69 | 67 68 74 25 29 2a 28 68 |ndow_hei|ght%)*(h|
|000050a0| 79 2d 6c 79 29 2b 6c 79 | 0d 1b b2 21 20 20 e7 20 |y-ly)+ly|...! . |
|000050b0| 6d 69 6e 78 3c 3e 6d 61 | 78 78 20 80 20 6d 69 6e |minx<>ma|xx . min|
|000050c0| 79 3c 3e 6d 61 78 79 20 | 8c 0d 1b bc 1c 20 20 20 |y<>maxy |..... |
|000050d0| 20 6c 78 24 3d c0 c3 6d | 69 6e 78 2c 6d 61 78 5f | lx$=..m|inx,max_|
|000050e0| 6c 65 6e 25 29 0d 1b c6 | 1c 20 20 20 20 6c 79 24 |len%)...|. ly$|
|000050f0| 3d c0 c3 6d 69 6e 79 2c | 6d 61 78 5f 6c 65 6e 25 |=..miny,|max_len%|
|00005100| 29 0d 1b d0 1c 20 20 20 | 20 68 78 24 3d c0 c3 6d |).... | hx$=..m|
|00005110| 61 78 78 2c 6d 61 78 5f | 6c 65 6e 25 29 0d 1b da |axx,max_|len%)...|
|00005120| 1c 20 20 20 20 68 79 24 | 3d c0 c3 6d 61 78 79 2c |. hy$|=..maxy,|
|00005130| 6d 61 78 5f 6c 65 6e 25 | 29 0d 1b e4 18 20 20 20 |max_len%|).... |
|00005140| 20 f2 75 70 64 61 74 65 | 5f 64 69 61 6c 6f 67 75 | .update|_dialogu|
|00005150| 65 0d 1b ee 33 20 20 20 | 20 6d 61 69 6e 5f 6d 65 |e...3 | main_me|
|00005160| 6e 75 5f 69 74 65 6d 73 | 24 28 75 6e 64 6f 5f 65 |nu_items|$(undo_e|
|00005170| 6e 74 72 79 25 2b 31 29 | 3d 22 55 6e 64 6f 20 7a |ntry%+1)|="Undo z|
|00005180| 6f 6f 6d 22 0d 1b f8 26 | 20 20 cc 20 7a 6f 6f 6d |oom"...&| . zoom|
|00005190| 5f 63 6f 75 6e 74 65 72 | 25 2d 3d 31 3a d4 20 31 |_counter|%-=1:. 1|
|000051a0| 2c 2d 31 35 2c 32 34 30 | 2c 33 0d 1c 02 07 20 20 |,-15,240|,3.... |
|000051b0| cd 0d 1c 0c 12 20 20 cc | 20 f2 63 6f 6f 72 64 5f |..... .| .coord_|
|000051c0| 6f 66 66 0d 1c 16 05 cd | 0d 1c 20 04 0d 1c 2a 05 |off.....|.. ...*.|
|000051d0| e1 0d 1c 34 05 3a 0d 1c | 3e 16 dd 20 f2 75 70 64 |...4.:..|>.. .upd|
|000051e0| 61 74 65 5f 64 69 61 6c | 6f 67 75 65 0d 1c 48 1b |ate_dial|ogue..H.|
|000051f0| 21 62 75 66 66 25 3d 64 | 69 61 6c 6f 67 75 65 5f |!buff%=d|ialogue_|
|00005200| 68 61 6e 64 6c 65 25 0d | 1c 52 1f 64 75 6d 6d 79 |handle%.|.R.dummy|
|00005210| 3d a4 70 75 74 5f 69 63 | 6f 6e 5f 74 65 78 74 28 |=.put_ic|on_text(|
|00005220| 32 2c 6c 78 24 29 0d 1c | 5c 1f 64 75 6d 6d 79 3d |2,lx$)..|\.dummy=|
|00005230| a4 70 75 74 5f 69 63 6f | 6e 5f 74 65 78 74 28 33 |.put_ico|n_text(3|
|00005240| 2c 68 78 24 29 0d 1c 66 | 1f 64 75 6d 6d 79 3d a4 |,hx$)..f|.dummy=.|
|00005250| 70 75 74 5f 69 63 6f 6e | 5f 74 65 78 74 28 34 2c |put_icon|_text(4,|
|00005260| 6c 79 24 29 0d 1c 70 1f | 64 75 6d 6d 79 3d a4 70 |ly$)..p.|dummy=.p|
|00005270| 75 74 5f 69 63 6f 6e 5f | 74 65 78 74 28 35 2c 68 |ut_icon_|text(5,h|
|00005280| 79 24 29 0d 1c 7a 0d 63 | 61 63 68 65 64 25 3d a3 |y$)..z.c|ached%=.|
|00005290| 0d 1c 84 1a f2 72 65 64 | 72 61 77 28 67 72 61 70 |.....red|raw(grap|
|000052a0| 68 5f 68 61 6e 64 6c 65 | 25 29 0d 1c 8e 05 e1 0d |h_handle|%)......|
|000052b0| 1c 98 05 3a 0d 1c a2 0f | dd 20 f2 7a 6f 6f 6d 5f |...:....|. .zoom_|
|000052c0| 6f 75 74 0d 1c ac 1b 6c | 78 24 3d 7a 6c 78 24 28 |out....l|x$=zlx$(|
|000052d0| 7a 6f 6f 6d 5f 63 6f 75 | 6e 74 65 72 25 29 0d 1c |zoom_cou|nter%)..|
|000052e0| b6 1b 68 78 24 3d 7a 68 | 78 24 28 7a 6f 6f 6d 5f |..hx$=zh|x$(zoom_|
|000052f0| 63 6f 75 6e 74 65 72 25 | 29 0d 1c c0 1b 6c 79 24 |counter%|)....ly$|
|00005300| 3d 7a 6c 79 24 28 7a 6f | 6f 6d 5f 63 6f 75 6e 74 |=zly$(zo|om_count|
|00005310| 65 72 25 29 0d 1c ca 1b | 68 79 24 3d 7a 68 79 24 |er%)....|hy$=zhy$|
|00005320| 28 7a 6f 6f 6d 5f 63 6f | 75 6e 74 65 72 25 29 0d |(zoom_co|unter%).|
|00005330| 1c d4 14 f2 75 70 64 61 | 74 65 5f 64 69 61 6c 6f |....upda|te_dialo|
|00005340| 67 75 65 0d 1c de 05 e1 | 0d 1c e8 05 3a 0d 1c f2 |gue.....|....:...|
|00005350| 0f dd 20 f2 63 6f 6f 72 | 64 5f 6f 6e 0d 1c fc 15 |.. .coor|d_on....|
|00005360| ea 20 61 63 74 78 25 2c | 61 63 74 79 25 2c 78 2c |. actx%,|acty%,x,|
|00005370| 79 0d 1d 06 11 61 63 74 | 78 25 3d 62 75 66 66 25 |y....act|x%=buff%|
|00005380| 21 30 0d 1d 10 11 61 63 | 74 79 25 3d 62 75 66 66 |!0....ac|ty%=buff|
|00005390| 25 21 34 0d 1d 1a 13 78 | 3d a4 72 65 61 64 78 28 |%!4....x|=.readx(|
|000053a0| 61 63 74 78 25 29 0d 1d | 24 13 79 3d a4 72 65 61 |actx%)..|$.y=.rea|
|000053b0| 64 79 28 61 63 74 79 25 | 29 0d 1d 2e 1c 63 6f 6f |dy(acty%|)....coo|
|000053c0| 72 64 24 3d 22 28 22 2b | c3 78 2b 22 2c 22 2b c3 |rd$="("+|.x+","+.|
|000053d0| 79 2b 22 29 22 0d 1d 38 | 1a 62 75 66 66 25 21 30 |y+")"..8|.buff%!0|
|000053e0| 3d 63 6f 6f 72 64 73 5f | 68 61 6e 64 6c 65 25 0d |=coords_|handle%.|
|000053f0| 1d 42 0d 62 75 66 66 25 | 21 34 3d 30 0d 1d 4c 0d |.B.buff%|!4=0..L.|
|00005400| 62 75 66 66 25 21 38 3d | 30 0d 1d 56 1a 62 75 66 |buff%!8=|0..V.buf|
|00005410| 66 25 21 31 32 3d 63 6f | 6f 72 64 73 5f 77 69 64 |f%!12=co|ords_wid|
|00005420| 74 68 25 0d 1d 60 1b 62 | 75 66 66 25 21 31 36 3d |th%..`.b|uff%!16=|
|00005430| 63 6f 6f 72 64 73 5f 68 | 65 69 67 68 74 25 0d 1d |coords_h|eight%..|
|00005440| 6a 63 e7 20 63 6f 6f 72 | 64 24 3c 3e 6c 61 73 74 |jc. coor|d$<>last|
|00005450| 74 65 78 74 24 20 8c 20 | c8 99 20 22 57 69 6d 70 |text$ . |.. "Wimp|
|00005460| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 63 6f |_ForceRe|draw",co|
|00005470| 6f 72 64 73 5f 68 61 6e | 64 6c 65 25 2c 30 2c 28 |ords_han|dle%,0,(|
|00005480| 30 2d 63 6f 6f 72 64 73 | 5f 68 65 69 67 68 74 25 |0-coords|_height%|
|00005490| 29 2c 63 6f 6f 72 64 73 | 5f 77 69 64 74 68 25 2c |),coords|_width%,|
|000054a0| 30 0d 1d 74 14 6c 61 73 | 74 74 65 78 74 24 3d 63 |0..t.las|ttext$=c|
|000054b0| 6f 6f 72 64 24 0d 1d 7e | 05 e1 0d 1d 88 05 3a 0d |oord$..~|......:.|
|000054c0| 1d 92 10 dd 20 f2 63 6f | 6f 72 64 5f 6f 66 66 0d |.... .co|ord_off.|
|000054d0| 1d 9c 0d 63 6f 6f 72 64 | 24 3d 22 22 0d 1d a6 10 |...coord|$=""....|
|000054e0| f2 73 68 6f 77 5f 63 6f | 6f 72 64 73 0d 1d b0 05 |.show_co|ords....|
|000054f0| e1 0d 1d ba 05 3a 0d 1d | c4 16 dd 20 a4 72 65 61 |.....:..|... .rea|
|00005500| 64 78 28 61 63 74 75 61 | 6c 78 25 29 0d 1d ce 0f |dx(actua|lx%)....|
|00005510| 20 20 6c 78 3d a0 28 6c | 78 24 29 0d 1d d8 0f 20 | lx=.(l|x$).... |
|00005520| 20 68 78 3d a0 28 68 78 | 24 29 0d 1d e2 1b 20 20 | hx=.(hx|$).... |
|00005530| 62 75 66 66 25 21 30 3d | 67 72 61 70 68 5f 68 61 |buff%!0=|graph_ha|
|00005540| 6e 64 6c 65 25 0d 1d ec | 25 20 20 c8 99 20 22 57 |ndle%...|% .. "W|
|00005550| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00005560| 74 65 22 2c 2c 62 75 66 | 66 25 0d 1d f6 1e 20 20 |te",,buf|f%.... |
|00005570| 73 63 6d 69 6e 78 25 3d | 62 75 66 66 25 21 34 2d |scminx%=|buff%!4-|
|00005580| 62 75 66 66 25 21 32 30 | 0d 1e 00 1c 20 20 77 69 |buff%!20|.... wi|
|00005590| 6e 78 25 3d 61 63 74 75 | 61 6c 78 25 2d 73 63 6d |nx%=actu|alx%-scm|
|000055a0| 69 6e 78 25 0d 1e 0a 25 | 3d 28 77 69 6e 78 25 2f |inx%...%|=(winx%/|
|000055b0| 77 69 6e 64 6f 77 5f 77 | 69 64 74 68 25 29 2a 28 |window_w|idth%)*(|
|000055c0| 68 78 2d 6c 78 29 2b 6c | 78 0d 1e 14 04 0d 1e 1e |hx-lx)+l|x.......|
|000055d0| 16 dd 20 a4 72 65 61 64 | 79 28 61 63 74 75 61 6c |.. .read|y(actual|
|000055e0| 79 25 29 0d 1e 28 0f 20 | 20 6c 79 3d a0 28 6c 79 |y%)..(. | ly=.(ly|
|000055f0| 24 29 0d 1e 32 0f 20 20 | 68 79 3d a0 28 68 79 24 |$)..2. |hy=.(hy$|
|00005600| 29 0d 1e 3c 1b 20 20 62 | 75 66 66 25 21 30 3d 67 |)..<. b|uff%!0=g|
|00005610| 72 61 70 68 5f 68 61 6e | 64 6c 65 25 0d 1e 46 25 |raph_han|dle%..F%|
|00005620| 20 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 | .. "Wi|mp_GetWi|
|00005630| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 75 66 66 |ndowStat|e",,buff|
|00005640| 25 0d 1e 50 26 20 20 76 | 69 73 69 62 6c 65 5f 68 |%..P& v|isible_h|
|00005650| 65 69 67 68 74 25 3d 62 | 75 66 66 25 21 31 36 2d |eight%=b|uff%!16-|
|00005660| 62 75 66 66 25 21 38 0d | 1e 5a 3f 20 20 73 63 6d |buff%!8.|.Z? scm|
|00005670| 69 6e 79 25 3d 62 75 66 | 66 25 21 38 2d 28 77 69 |iny%=buf|f%!8-(wi|
|00005680| 6e 64 6f 77 5f 68 65 69 | 67 68 74 25 2d 76 69 73 |ndow_hei|ght%-vis|
|00005690| 69 62 6c 65 5f 68 65 69 | 67 68 74 25 29 2d 62 75 |ible_hei|ght%)-bu|
|000056a0| 66 66 25 21 32 34 0d 1e | 64 1c 20 20 77 69 6e 79 |ff%!24..|d. winy|
|000056b0| 25 3d 61 63 74 75 61 6c | 79 25 2d 73 63 6d 69 6e |%=actual|y%-scmin|
|000056c0| 79 25 0d 1e 6e 26 3d 28 | 77 69 6e 79 25 2f 77 69 |y%..n&=(|winy%/wi|
|000056d0| 6e 64 6f 77 5f 68 65 69 | 67 68 74 25 29 2a 28 68 |ndow_hei|ght%)*(h|
|000056e0| 79 2d 6c 79 29 2b 6c 79 | 0d 1e 78 05 3a 0d 1e 82 |y-ly)+ly|..x.:...|
|000056f0| 12 dd 20 f2 73 68 6f 77 | 5f 63 6f 6f 72 64 73 0d |.. .show|_coords.|
|00005700| 1e 8c 0b ea 20 66 6c 61 | 67 25 0d 1e 96 16 20 20 |.... fla|g%.... |
|00005710| 6c 61 73 74 74 65 78 74 | 24 3d 63 6f 6f 72 64 24 |lasttext|$=coord$|
|00005720| 0d 1e a0 1c 20 20 62 75 | 66 66 25 21 30 3d 63 6f |.... bu|ff%!0=co|
|00005730| 6f 72 64 73 5f 68 61 6e | 64 6c 65 25 0d 1e aa 2a |ords_han|dle%...*|
|00005740| 20 20 c8 99 22 57 69 6d | 70 5f 52 65 64 72 61 77 | .."Wim|p_Redraw|
|00005750| 57 69 6e 64 6f 77 22 2c | 2c 62 75 66 66 25 20 b8 |Window",|,buff% .|
|00005760| 20 66 6c 61 67 25 0d 1e | b4 0e 20 20 c8 95 20 66 | flag%..|.. .. f|
|00005770| 6c 61 67 25 0d 1e be 62 | 20 20 20 20 f2 64 72 61 |lag%...b| .dra|
|00005780| 77 5f 63 6f 6f 72 64 73 | 28 62 75 66 66 25 21 34 |w_coords|(buff%!4|
|00005790| 2c 62 75 66 66 25 21 38 | 2c 62 75 66 66 25 21 31 |,buff%!8|,buff%!1|
|000057a0| 32 2c 62 75 66 66 25 21 | 31 36 2c 62 75 66 66 25 |2,buff%!|16,buff%|
|000057b0| 21 32 30 2c 62 75 66 66 | 25 21 32 34 2c 62 75 66 |!20,buff|%!24,buf|
|000057c0| 66 25 21 32 38 2c 62 75 | 66 66 25 21 33 36 2c 63 |f%!28,bu|ff%!36,c|
|000057d0| 6f 6f 72 64 24 29 0d 1e | c8 2d 20 20 20 20 c8 99 |oord$)..|.- ..|
|000057e0| 20 22 57 69 6d 70 5f 47 | 65 74 52 65 63 74 61 6e | "Wimp_G|etRectan|
|000057f0| 67 6c 65 22 2c 2c 62 75 | 66 66 25 20 b8 20 66 6c |gle",,bu|ff% . fl|
|00005800| 61 67 25 0d 1e d2 07 20 | 20 ce 0d 1e dc 05 e1 0d |ag%.... | .......|
|00005810| 1e e6 04 0d 1e f0 47 dd | 20 f2 64 72 61 77 5f 63 |......G.| .draw_c|
|00005820| 6f 6f 72 64 73 28 76 61 | 78 30 25 2c 76 61 79 30 |oords(va|x0%,vay0|
|00005830| 25 2c 76 61 78 31 25 2c | 76 61 79 31 25 2c 73 63 |%,vax1%,|vay1%,sc|
|00005840| 78 25 2c 73 63 79 25 2c | 67 77 78 30 25 2c 67 77 |x%,scy%,|gwx0%,gw|
|00005850| 78 31 25 2c 74 65 78 74 | 24 29 0d 1e fa 1a ea 20 |x1%,text|$)..... |
|00005860| 74 6c 78 25 2c 74 6c 79 | 25 2c 6f 78 25 2c 6f 79 |tlx%,tly|%,ox%,oy|
|00005870| 25 2c 58 25 0d 1f 04 13 | 74 6c 78 25 3d 76 61 78 |%,X%....|tlx%=vax|
|00005880| 30 25 2d 73 63 78 25 0d | 1f 0e 13 74 6c 79 25 3d |0%-scx%.|...tly%=|
|00005890| 76 61 79 31 25 2d 73 63 | 79 25 0d 1f 18 24 6f 78 |vay1%-sc|y%...$ox|
|000058a0| 25 3d 74 6c 78 25 3a 6f | 79 25 3d 74 6c 79 25 2d |%=tlx%:o|y%=tly%-|
|000058b0| 63 6f 6f 72 64 73 5f 68 | 65 69 67 68 74 25 0d 1f |coords_h|eight%..|
|000058c0| 22 11 ec 20 6f 78 25 2c | 6f 79 25 2b 31 32 30 0d |".. ox%,|oy%+120.|
|000058d0| 1f 2c 0a f1 74 65 78 74 | 24 0d 1f 36 05 e1 0d 1f |.,..text|$..6....|
|000058e0| 40 05 3a 0d 1f 4a 0f dd | 20 a4 67 65 74 5f 6c 69 |@.:..J..| .get_li|
|000058f0| 6e 65 0d 1f 54 0e e3 20 | 43 25 3d 30 20 b8 20 35 |ne..T.. |C%=0 . 5|
|00005900| 0d 1f 5e 27 6d 65 6e 75 | 5f 6c 69 73 74 25 21 28 |..^'menu|_list%!(|
|00005910| 43 25 2a 34 29 3d 70 6f | 6c 6c 5f 62 75 66 66 25 |C%*4)=po|ll_buff%|
|00005920| 21 28 43 25 2a 34 29 0d | 1f 68 21 e7 20 70 6f 6c |!(C%*4).|.h!. pol|
|00005930| 6c 5f 62 75 66 66 25 21 | 28 43 25 2a 34 29 3d 2d |l_buff%!|(C%*4)=-|
|00005940| 31 20 8c 20 43 25 3d 35 | 0d 1f 72 05 ed 0d 1f 7c |1 . C%=5|..r....||
|00005950| 3b c8 99 20 22 57 69 6d | 70 5f 44 65 63 6f 64 65 |;.. "Wim|p_Decode|
|00005960| 4d 65 6e 75 22 2c 2c 6d | 61 69 6e 5f 6d 65 6e 75 |Menu",,m|ain_menu|
|00005970| 5f 62 6c 6f 63 6b 25 2c | 6d 65 6e 75 5f 6c 69 73 |_block%,|menu_lis|
|00005980| 74 25 2c 62 75 66 66 25 | 0d 1f 86 2b 73 74 72 69 |t%,buff%|...+stri|
|00005990| 6e 67 24 3d c1 24 62 75 | 66 66 25 2c a7 24 62 75 |ng$=.$bu|ff%,.$bu|
|000059a0| 66 66 25 2c 22 2e 22 29 | 2b 31 2c a9 24 62 75 66 |ff%,".")|+1,.$buf|
|000059b0| 66 25 29 0d 1f 90 1e e7 | 20 73 74 72 69 6e 67 24 |f%).....| string$|
|000059c0| 3d 22 22 20 8c 20 73 74 | 72 69 6e 67 24 3d 22 30 |="" . st|ring$="0|
|000059d0| 22 0d 1f 9a 13 3d a4 63 | 61 70 73 28 73 74 72 69 |"....=.c|aps(stri|
|000059e0| 6e 67 24 29 0d 1f a4 05 | 3a 0d 1f ae 19 dd 20 f2 |ng$)....|:..... .|
|000059f0| 66 6f 72 63 65 5f 72 65 | 64 72 61 77 5f 67 72 61 |force_re|draw_gra|
|00005a00| 70 68 0d 1f b8 49 c8 99 | 20 22 57 69 6d 70 5f 46 |ph...I..| "Wimp_F|
|00005a10| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 67 72 61 70 |orceRedr|aw",grap|
|00005a20| 68 5f 68 61 6e 64 6c 65 | 25 2c 30 2c 2d 77 69 6e |h_handle|%,0,-win|
|00005a30| 64 6f 77 5f 68 65 69 67 | 68 74 25 2c 77 69 6e 64 |dow_heig|ht%,wind|
|00005a40| 6f 77 5f 77 69 64 74 68 | 25 2c 30 0d 1f c2 05 e1 |ow_width|%,0.....|
|00005a50| 0d 1f cc 05 3a 0d 1f d6 | 11 dd 20 f2 72 65 70 6f |....:...|.. .repo|
|00005a60| 72 74 28 65 24 29 0d 1f | e0 11 21 65 72 72 5f 62 |rt(e$)..|..!err_b|
|00005a70| 6c 6f 63 6b 25 3d 30 0d | 1f ea 19 24 28 65 72 72 |lock%=0.|...$(err|
|00005a80| 5f 62 6c 6f 63 6b 25 2b | 34 29 3d 65 24 2b bd 30 |_block%+|4)=e$+.0|
|00005a90| 0d 1f f4 17 65 72 72 5f | 66 6c 61 67 73 25 3d 31 |....err_|flags%=1|
|00005aa0| 2b 28 31 3c 3c 31 29 0d | 1f fe 17 24 65 72 72 5f |+(1<<1).|...$err_|
|00005ab0| 6e 61 6d 65 25 3d 41 70 | 70 4e 61 6d 65 24 0d 20 |name%=Ap|pName$. |
|00005ac0| 08 3f c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 |.?.. "Wi|mp_Repor|
|00005ad0| 74 45 72 72 6f 72 22 2c | 65 72 72 5f 62 6c 6f 63 |tError",|err_bloc|
|00005ae0| 6b 25 2c 65 72 72 5f 66 | 6c 61 67 73 25 2c 65 72 |k%,err_f|lags%,er|
|00005af0| 72 5f 6e 61 6d 65 25 20 | b8 20 2c 72 25 0d 20 12 |r_name% |. ,r%. .|
|00005b00| 22 e7 20 72 25 3d 32 20 | 8c 20 c8 99 20 22 57 69 |". r%=2 |. .. "Wi|
|00005b10| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 3a e0 0d |mp_Close|Down":..|
|00005b20| 20 1c 05 e1 0d 20 26 05 | 3a 0d 20 30 0f dd 20 a4 | .... &.|:. 0.. .|
|00005b30| 63 61 70 73 28 74 24 29 | 0d 20 3a 1c ea 20 6f 75 |caps(t$)|. :.. ou|
|00005b40| 74 24 2c 61 24 2c 61 25 | 2c 64 69 66 66 25 2c 41 |t$,a$,a%|,diff%,A|
|00005b50| 25 2c 5a 25 0d 20 44 0b | 61 25 3d 97 22 61 22 0d |%,Z%. D.|a%=."a".|
|00005b60| 20 4e 0b 41 25 3d 97 22 | 41 22 0d 20 58 0b 7a 25 | N.A%=."|A". X.z%|
|00005b70| 3d 97 22 7a 22 0d 20 62 | 0f 64 69 66 66 25 3d 41 |=."z". b|.diff%=A|
|00005b80| 25 2d 61 25 0d 20 6c 0b | 6f 75 74 24 3d 22 22 0d |%-a%. l.|out$="".|
|00005b90| 20 76 0f e7 20 a9 28 74 | 24 29 3e 30 20 8c 0d 20 | v.. .(t|$)>0 .. |
|00005ba0| 80 14 20 20 e3 20 43 25 | 3d 31 20 b8 20 a9 28 74 |.. . C%|=1 . .(t|
|00005bb0| 24 29 0d 20 8a 12 20 20 | 61 24 3d c1 74 24 2c 43 |$). .. |a$=.t$,C|
|00005bc0| 25 2c 31 29 0d 20 94 1b | 20 20 e7 20 97 61 24 3e |%,1). ..| . .a$>|
|00005bd0| 3d 61 25 20 80 20 97 61 | 24 3c 3d 7a 25 20 8c 0d |=a% . .a|$<=z% ..|
|00005be0| 20 9e 19 20 20 20 20 61 | 24 3d bd 28 97 61 24 2b | .. a|$=.(.a$+|
|00005bf0| 28 41 25 2d 61 25 29 29 | 0d 20 a8 07 20 20 cd 0d |(A%-a%))|. .. ..|
|00005c00| 20 b2 12 20 20 6f 75 74 | 24 3d 6f 75 74 24 2b 61 | .. out|$=out$+a|
|00005c10| 24 0d 20 bc 07 20 20 ed | 0d 20 c6 05 cd 0d 20 d0 |$. .. .|. .... .|
|00005c20| 09 3d 6f 75 74 24 0d 20 | da 05 3a 0d 20 e4 16 dd |.=out$. |..:. ...|
|00005c30| 20 a4 67 65 74 5f 77 6f | 72 64 28 66 69 6c 65 25 | .get_wo|rd(file%|
|00005c40| 29 0d 20 ee 0d ea 20 41 | 2c 42 2c 43 2c 44 0d 20 |). ... A|,B,C,D. |
|00005c50| f8 0d 41 3d 9a 23 66 69 | 6c 65 25 0d 21 02 0d 42 |..A=.#fi|le%.!..B|
|00005c60| 3d 9a 23 66 69 6c 65 25 | 0d 21 0c 0d 43 3d 9a 23 |=.#file%|.!..C=.#|
|00005c70| 66 69 6c 65 25 0d 21 16 | 0d 44 3d 9a 23 66 69 6c |file%.!.|.D=.#fil|
|00005c80| 65 25 0d 21 20 1d 3d 41 | 2b 28 42 3c 3c 38 29 2b |e%.! .=A|+(B<<8)+|
|00005c90| 28 43 3c 3c 31 36 29 2b | 28 44 3c 3c 32 34 29 0d |(C<<16)+|(D<<24).|
|00005ca0| 21 2a 05 3a 0d 21 34 1c | dd 20 f2 70 75 74 5f 77 |!*.:.!4.|. .put_w|
|00005cb0| 6f 72 64 28 66 69 6c 65 | 25 2c 77 6f 72 64 25 29 |ord(file|%,word%)|
|00005cc0| 0d 21 3e 12 f4 4c 4f 43 | 41 4c 20 41 2c 42 2c 43 |.!>..LOC|AL A,B,C|
|00005cd0| 2c 44 0d 21 48 14 64 75 | 6d 6d 79 25 3d 25 31 31 |,D.!H.du|mmy%=%11|
|00005ce0| 31 31 31 31 31 31 0d 21 | 52 14 41 3d 77 6f 72 64 |111111.!|R.A=word|
|00005cf0| 25 20 80 20 64 75 6d 6d | 79 25 0d 21 5c 1e 42 3d |% . dumm|y%.!\.B=|
|00005d00| 28 77 6f 72 64 25 20 80 | 20 28 64 75 6d 6d 79 25 |(word% .| (dummy%|
|00005d10| 3c 3c 38 29 29 3e 3e 38 | 0d 21 66 20 43 3d 28 77 |<<8))>>8|.!f C=(w|
|00005d20| 6f 72 64 25 20 80 20 28 | 64 75 6d 6d 79 25 3c 3c |ord% . (|dummy%<<|
|00005d30| 31 36 29 29 3e 3e 31 36 | 0d 21 70 20 44 3d 28 77 |16))>>16|.!p D=(w|
|00005d40| 6f 72 64 25 20 80 20 28 | 64 75 6d 6d 79 25 3c 3c |ord% . (|dummy%<<|
|00005d50| 32 34 29 29 3e 3e 32 34 | 0d 21 7a 0d d5 23 66 69 |24))>>24|.!z..#fi|
|00005d60| 6c 65 25 2c 41 0d 21 84 | 0d d5 23 66 69 6c 65 25 |le%,A.!.|..#file%|
|00005d70| 2c 42 0d 21 8e 0d d5 23 | 66 69 6c 65 25 2c 43 0d |,B.!...#|file%,C.|
|00005d80| 21 98 0d d5 23 66 69 6c | 65 25 2c 44 0d 21 a2 05 |!...#fil|e%,D.!..|
|00005d90| e1 0d 21 ac 05 3a 0d 21 | b6 19 dd 20 f2 66 69 6c |..!..:.!|... .fil|
|00005da0| 65 5f 68 65 61 64 65 72 | 28 66 69 6c 65 25 29 0d |e_header|(file%).|
|00005db0| 21 c0 13 d5 23 66 69 6c | 65 25 2c 22 44 72 61 77 |!...#fil|e%,"Draw|
|00005dc0| 22 3b 0d 21 ca 18 f2 70 | 75 74 5f 77 6f 72 64 28 |";.!...p|ut_word(|
|00005dd0| 66 69 6c 65 25 2c 32 30 | 31 29 0d 21 d4 16 f2 70 |file%,20|1).!...p|
|00005de0| 75 74 5f 77 6f 72 64 28 | 66 69 6c 65 25 2c 30 29 |ut_word(|file%,0)|
|00005df0| 0d 21 de 1b d5 23 66 69 | 6c 65 25 2c 22 4d 61 74 |.!...#fi|le%,"Mat|
|00005e00| 68 47 72 61 70 68 20 20 | 20 22 3b 0d 21 e8 16 f2 |hGraph | ";.!...|
|00005e10| 70 75 74 5f 77 6f 72 64 | 28 66 69 6c 65 25 2c 30 |put_word|(file%,0|
|00005e20| 29 0d 21 f2 16 f2 70 75 | 74 5f 77 6f 72 64 28 66 |).!...pu|t_word(f|
|00005e30| 69 6c 65 25 2c 30 29 0d | 21 fc 26 f2 70 75 74 5f |ile%,0).|!.&.put_|
|00005e40| 77 6f 72 64 28 66 69 6c | 65 25 2c 77 69 6e 64 6f |word(fil|e%,windo|
|00005e50| 77 5f 77 69 64 74 68 25 | 2a 32 35 36 29 0d 22 06 |w_width%|*256).".|
|00005e60| 27 f2 70 75 74 5f 77 6f | 72 64 28 66 69 6c 65 25 |'.put_wo|rd(file%|
|00005e70| 2c 77 69 6e 64 6f 77 5f | 68 65 69 67 68 74 25 2a |,window_|height%*|
|00005e80| 32 35 36 29 0d 22 10 04 | 0d 22 1a 16 f2 70 75 74 |256)."..|."...put|
|00005e90| 5f 77 6f 72 64 28 66 69 | 6c 65 25 2c 36 29 0d 22 |_word(fi|le%,6)."|
|00005ea0| 24 19 f2 70 75 74 5f 77 | 6f 72 64 28 66 69 6c 65 |$..put_w|ord(file|
|00005eb0| 25 2c 37 37 35 36 29 0d | 22 2e 16 f2 70 75 74 5f |%,7756).|"...put_|
|00005ec0| 77 6f 72 64 28 66 69 6c | 65 25 2c 30 29 0d 22 38 |word(fil|e%,0)."8|
|00005ed0| 16 f2 70 75 74 5f 77 6f | 72 64 28 66 69 6c 65 25 |..put_wo|rd(file%|
|00005ee0| 2c 30 29 0d 22 42 26 f2 | 70 75 74 5f 77 6f 72 64 |,0)."B&.|put_word|
|00005ef0| 28 66 69 6c 65 25 2c 77 | 69 6e 64 6f 77 5f 77 69 |(file%,w|indow_wi|
|00005f00| 64 74 68 25 2a 32 35 36 | 29 0d 22 4c 27 f2 70 75 |dth%*256|)."L'.pu|
|00005f10| 74 5f 77 6f 72 64 28 66 | 69 6c 65 25 2c 77 69 6e |t_word(f|ile%,win|
|00005f20| 64 6f 77 5f 68 65 69 67 | 68 74 25 2a 32 35 36 29 |dow_heig|ht%*256)|
|00005f30| 0d 22 56 1e f2 70 75 74 | 5f 77 6f 72 64 28 66 69 |."V..put|_word(fi|
|00005f40| 6c 65 25 2c 35 33 38 39 | 37 36 32 38 38 29 0d 22 |le%,5389|76288)."|
|00005f50| 60 1e f2 70 75 74 5f 77 | 6f 72 64 28 66 69 6c 65 |`..put_w|ord(file|
|00005f60| 25 2c 35 33 38 39 37 36 | 32 38 38 29 0d 22 6a 1e |%,538976|288)."j.|
|00005f70| f2 70 75 74 5f 77 6f 72 | 64 28 66 69 6c 65 25 2c |.put_wor|d(file%,|
|00005f80| 35 33 38 39 37 36 32 38 | 38 29 0d 22 74 05 e1 0d |53897628|8)."t...|
|00005f90| 22 7e 05 3a 0d 22 88 27 | dd 20 f2 70 75 74 5f 6c |"~.:.".'|. .put_l|
|00005fa0| 69 6e 65 28 66 69 6c 65 | 25 2c 63 6f 6c 25 2c 78 |ine(file|%,col%,x|
|00005fb0| 30 2c 79 30 2c 78 31 2c | 79 31 29 0d 22 92 15 ea |0,y0,x1,|y1)."...|
|00005fc0| 20 63 6f 6c 6f 75 72 5f | 62 79 74 65 73 2c 43 25 | colour_|bytes,C%|
|00005fd0| 0d 22 9c 16 f2 70 75 74 | 5f 77 6f 72 64 28 66 69 |."...put|_word(fi|
|00005fe0| 6c 65 25 2c 32 29 0d 22 | a6 17 f2 70 75 74 5f 77 |le%,2)."|...put_w|
|00005ff0| 6f 72 64 28 66 69 6c 65 | 25 2c 36 38 29 0d 22 b0 |ord(file|%,68).".|
|00006000| 1b f2 70 75 74 5f 77 6f | 72 64 28 66 69 6c 65 25 |..put_wo|rd(file%|
|00006010| 2c 32 35 36 2a 78 30 29 | 0d 22 ba 1b f2 70 75 74 |,256*x0)|."...put|
|00006020| 5f 77 6f 72 64 28 66 69 | 6c 65 25 2c 32 35 36 2a |_word(fi|le%,256*|
|00006030| 79 30 29 0d 22 c4 1b f2 | 70 75 74 5f 77 6f 72 64 |y0)."...|put_word|
|00006040| 28 66 69 6c 65 25 2c 32 | 35 36 2a 78 31 29 0d 22 |(file%,2|56*x1)."|
|00006050| ce 1b f2 70 75 74 5f 77 | 6f 72 64 28 66 69 6c 65 |...put_w|ord(file|
|00006060| 25 2c 32 35 36 2a 79 31 | 29 0d 22 d8 17 f2 70 75 |%,256*y1|)."...pu|
|00006070| 74 5f 77 6f 72 64 28 66 | 69 6c 65 25 2c 2d 31 29 |t_word(f|ile%,-1)|
|00006080| 0d 22 e2 1b 63 6f 6c 6f | 75 72 5f 62 79 74 65 73 |."..colo|ur_bytes|
|00006090| 3d a4 72 67 62 28 63 6f | 6c 25 29 0d 22 ec 21 f2 |=.rgb(co|l%).".!.|
|000060a0| 70 75 74 5f 77 6f 72 64 | 28 66 69 6c 65 25 2c 63 |put_word|(file%,c|
|000060b0| 6f 6c 6f 75 72 5f 62 79 | 74 65 73 29 0d 22 f6 16 |olour_by|tes)."..|
|000060c0| f2 70 75 74 5f 77 6f 72 | 64 28 66 69 6c 65 25 2c |.put_wor|d(file%,|
|000060d0| 30 29 0d 23 00 32 f2 70 | 75 74 5f 77 6f 72 64 28 |0).#.2.p|ut_word(|
|000060e0| 66 69 6c 65 25 2c 35 33 | 37 39 31 39 35 35 34 29 |file%,53|7919554)|
|000060f0| 20 20 20 20 20 20 20 3a | f4 20 70 61 74 68 20 73 | :|. path s|
|00006100| 74 79 6c 65 0d 23 0a 16 | f2 70 75 74 5f 77 6f 72 |tyle.#..|.put_wor|
|00006110| 64 28 66 69 6c 65 25 2c | 32 29 0d 23 14 1b f2 70 |d(file%,|2).#...p|
|00006120| 75 74 5f 77 6f 72 64 28 | 66 69 6c 65 25 2c 78 30 |ut_word(|file%,x0|
|00006130| 2a 32 35 36 29 0d 23 1e | 1b f2 70 75 74 5f 77 6f |*256).#.|..put_wo|
|00006140| 72 64 28 66 69 6c 65 25 | 2c 79 30 2a 32 35 36 29 |rd(file%|,y0*256)|
|00006150| 0d 23 28 16 f2 70 75 74 | 5f 77 6f 72 64 28 66 69 |.#(..put|_word(fi|
|00006160| 6c 65 25 2c 38 29 0d 23 | 32 1b f2 70 75 74 5f 77 |le%,8).#|2..put_w|
|00006170| 6f 72 64 28 66 69 6c 65 | 25 2c 78 31 2a 32 35 36 |ord(file|%,x1*256|
|00006180| 29 0d 23 3c 1b f2 70 75 | 74 5f 77 6f 72 64 28 66 |).#<..pu|t_word(f|
|00006190| 69 6c 65 25 2c 79 31 2a | 32 35 36 29 0d 23 46 16 |ile%,y1*|256).#F.|
|000061a0| f2 70 75 74 5f 77 6f 72 | 64 28 66 69 6c 65 25 2c |.put_wor|d(file%,|
|000061b0| 30 29 0d 23 50 05 e1 0d | 23 5a 05 3a 0d 23 64 17 |0).#P...|#Z.:.#d.|
|000061c0| dd 20 f2 70 75 74 5f 63 | 75 72 76 65 28 66 69 6c |. .put_c|urve(fil|
|000061d0| 65 25 29 0d 23 6e 16 ea | 20 43 25 2c 65 72 72 25 |e%).#n..| C%,err%|
|000061e0| 2c 66 6c 61 67 25 2c 79 | 25 0d 23 78 16 f2 70 75 |,flag%,y|%.#x..pu|
|000061f0| 74 5f 77 6f 72 64 28 66 | 69 6c 65 25 2c 32 29 0d |t_word(f|ile%,2).|
|00006200| 23 82 40 f2 70 75 74 5f | 77 6f 72 64 28 66 69 6c |#.@.put_|word(fil|
|00006210| 65 25 2c a4 72 6f 75 6e | 64 28 34 2a 28 31 30 2b |e%,.roun|d(4*(10+|
|00006220| 31 2b 33 2a 28 77 69 6e | 64 6f 77 5f 77 69 64 74 |1+3*(win|dow_widt|
|00006230| 68 25 2f 70 69 78 65 6c | 25 2b 31 29 29 29 29 0d |h%/pixel|%+1)))).|
|00006240| 23 8c 1a f2 70 75 74 5f | 77 6f 72 64 28 66 69 6c |#...put_|word(fil|
|00006250| 65 25 2c 32 35 36 2a 30 | 29 0d 23 96 1a f2 70 75 |e%,256*0|).#...pu|
|00006260| 74 5f 77 6f 72 64 28 66 | 69 6c 65 25 2c 32 35 36 |t_word(f|ile%,256|
|00006270| 2a 30 29 0d 23 a0 26 f2 | 70 75 74 5f 77 6f 72 64 |*0).#.&.|put_word|
|00006280| 28 66 69 6c 65 25 2c 32 | 35 36 2a 77 69 6e 64 6f |(file%,2|56*windo|
|00006290| 77 5f 77 69 64 74 68 25 | 29 0d 23 aa 27 f2 70 75 |w_width%|).#.'.pu|
|000062a0| 74 5f 77 6f 72 64 28 66 | 69 6c 65 25 2c 32 35 36 |t_word(f|ile%,256|
|000062b0| 2a 77 69 6e 64 6f 77 5f | 68 65 69 67 68 74 25 29 |*window_|height%)|
|000062c0| 0d 23 b4 17 f2 70 75 74 | 5f 77 6f 72 64 28 66 69 |.#...put|_word(fi|
|000062d0| 6c 65 25 2c 2d 31 29 0d | 23 be 16 f2 70 75 74 5f |le%,-1).|#...put_|
|000062e0| 77 6f 72 64 28 66 69 6c | 65 25 2c 30 29 0d 23 c8 |word(fil|e%,0).#.|
|000062f0| 16 f2 70 75 74 5f 77 6f | 72 64 28 66 69 6c 65 25 |..put_wo|rd(file%|
|00006300| 2c 30 29 0d 23 d2 32 f2 | 70 75 74 5f 77 6f 72 64 |,0).#.2.|put_word|
|00006310| 28 66 69 6c 65 25 2c 35 | 33 37 39 31 39 35 35 34 |(file%,5|37919554|
|00006320| 29 20 20 20 20 20 20 20 | 3a f4 20 70 61 74 68 20 |) |:. path |
|00006330| 73 74 79 6c 65 0d 23 dc | 0a 65 72 72 25 3d a3 0d |style.#.|.err%=..|
|00006340| 23 e6 23 e3 20 43 25 3d | 30 20 b8 20 77 69 6e 64 |#.#. C%=|0 . wind|
|00006350| 6f 77 5f 77 69 64 74 68 | 25 20 88 20 70 69 78 65 |ow_width|% . pixe|
|00006360| 6c 25 0d 23 f0 0e 20 20 | e7 20 43 25 3d 30 20 8c |l%.#.. |. C%=0 .|
|00006370| 0d 23 fa 0e 20 20 20 20 | 74 61 67 25 3d 32 0d 24 |.#.. |tag%=2.$|
|00006380| 04 2f 20 20 cc 20 e7 20 | 79 25 28 43 25 2d 31 29 |./ . . |y%(C%-1)|
|00006390| 3d 62 61 64 5f 76 61 6c | 75 65 25 20 8c 20 74 61 |=bad_val|ue% . ta|
|000063a0| 67 25 3d 32 20 8b 20 74 | 61 67 25 3d 38 0d 24 0e |g%=2 . t|ag%=8.$.|
|000063b0| 07 20 20 cd 0d 24 18 0d | 20 20 66 6c 61 67 25 3d |. ..$..| flag%=|
|000063c0| a3 0d 24 22 0f 20 20 79 | 25 3d 79 25 28 43 25 29 |..$". y|%=y%(C%)|
|000063d0| 0d 24 2c 35 20 20 e7 20 | 79 25 3e 77 69 6e 64 6f |.$,5 . |y%>windo|
|000063e0| 77 5f 68 65 69 67 68 74 | 25 20 8c 20 79 25 3d 77 |w_height|% . y%=w|
|000063f0| 69 6e 64 6f 77 5f 68 65 | 69 67 68 74 25 3a 66 6c |indow_he|ight%:fl|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.